Открытие листа Excel нажатием кнопки - VB

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

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

Помогите очень нужно сделать на форме кнопку по нажатию на которую открывался бы лист excel. За ранее спасибо

Решение задачи: «Открытие листа Excel нажатием кнопки»

textual
Листинг программы
Private Sub Command1_Click()
 
    Dim xl As New Excel.Application
    Dim xlw As Excel.Workbook
 
    ' Открываем файл
    Set xlw = xl.Workbooks.Open("c:\myDir\book1.xls")
 
    ' Переименовать  "Sheet1"
    xlw.Sheets("Sheet1").Select
 
    ' Выбираем значение
    MsgBox xlw.Application.Cells(2, 3).Value
 
    ' Закрываем
    xlw.Close False
 
    ' Освобождаем memory
    Set xlw = Nothing
    Set xl = Nothing
 
End Sub

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


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

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

12   голосов , оценка 4.5 из 5
Похожие ответы