Запись таблицы в txt макросом - VBA
Формулировка задачи:
Добрый день, люди добрые)
Подскажите как сделать правильную запись в txt.
Вот есть такой вариант для таблицы 10 на 3. Идем по строкам и записываем 3 столбца с табуляцией.
Внимание вопрос: как сделать запись, если количество столбцов передается переменной?
(т.е. я например заранее не знаю, сколько столбцов или их слишком много, чтобы в строке Print перечислять все и менять это постоянно)
Заранее благодарен.
Решение задачи: «Запись таблицы в txt макросом»
textual
Листинг программы
Sub saveInTxt() Open ThisWorkbook.Path & "\ResultExcel.txt" For Output As #1 StartRow = 1 FinalRow = 10 StartColumn = 1 FinalColumn = 3 For i = StartRow To FinalRow For j = StartRow To FinalRow Print #1, Cells(i, j).Value; Print #1, Next j Next i Close #1 End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д