Открытие листа 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
