Как сделать чтобы данные, которые я получаю в тестах, сделанных в Visual Basic, сохранялися в других листах Excel - VB
Формулировка задачи:
Мне нужно создать тесты с использованием Visual Basic, но я не знаю, как сделать, чтобы данные которые я получаю в тестах сохранялись в других листах в Excel????
Решение задачи: «Как сделать чтобы данные, которые я получаю в тестах, сделанных в Visual Basic, сохранялися в других листах Excel»
textual
Листинг программы
Private Sub WriteExcel()
Dim i As Integer, j As Integer
Dim X As Integer, Y As Integer
Dim objExcel As Object
Set objExcel = CreateObject("Excel.Application")
If objExcel Is Nothing Then Exit Sub
objExcel.Visible = True
objExcel.Workbooks.Add
X = Flex1.Cols
Y = Flex1.Rows
For j = 0 To Y - 1
For i = 0 To X - 1
Flex1.Col = i
Flex1.Row = j
objExcel.ActiveCell(j + 1, i + 1) = Flex1.Text
Next i
Next j
Set objExcel = Nothing
End Sub