Вывод строки из таблицы Access на лист Excel по запросу - VB

Узнай цену своей работы

Формулировка задачи:

делаю так!
вот выводит первую строку с помощью MsgBox а как теперь записать в страницу?

Решение задачи: «Вывод строки из таблицы Access на лист Excel по запросу»

textual
Листинг программы
Set MyXL = GetObject(App.Path & "\1.xlsx") 'или можно новый создать
  MyXL.Application.Visible = False               
  MyXL.Parent.Windows(1).Visible = True
  Set xlSheet = MyXL.Worksheets(1)
 
  MyXL.Worksheets(1).Cells(1, 1).Value = ado_recordset.Fields(1).Value
 
  MyXL.Save
  MyXL.Application.Quit
  Set xlSheet = Nothing
  Set MyXL = Nothing

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

9   голосов , оценка 3.889 из 5