Как с vb6 экспортировать переменные по порядку в строки excel?
Формулировка задачи:
Здравствуйте, подскажите, пожалуйста, как сделать, чтобы при нажатии Command записывались по порядку переменные в Excel файл в определенные строки. У меня код перезаписывает (предлагает заменить файл)
Решение задачи: «Как с vb6 экспортировать переменные по порядку в строки excel?»
textual
Листинг программы
Option Explicit Dim oExcel, i&, s$ Private Sub Form_Load() Set oExcel = CreateObject("Excel.Application") With oExcel.Workbooks.open(App.Path & "\000.xls") With .ActiveSheet Do s = InputBox("Запишите число в ячейку A1") If IsNumeric(s) Then .cells(1, 1) = s: Exit Do Loop Do s = InputBox("Запишите число в ячейку B1") If IsNumeric(s) Then .cells(1, 2) = s: Exit Do Loop .cells(1, 3).FormulaR1C1 = "=SUM(RC[-2]:RC[-1])" MsgBox "Ответ записан в ячейку C1: = " & .cells(1, 3) End With ' .save End With oExcel.Quit Set oExcel = Nothing End End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д