Здравствуйте. Помогите пожалуйста с макросом: на сохранение определенной области (А4-В5) в текстовом формате с именем из определенной ячейки (А1) желательно без табуляции.
Здравствуйте. Помогите пожалуйста с макросом: на сохранение определенной области (А4-В5) в текстовом формате с именем из определенной ячейки (А1) желательно без табуляции.pm89
'Здесь укажите путь, по которому надо сохранить текстовый файл. strFullName = "C:\Users\User\Desktop\" & Range("A1") & ".txt" arr() = Range("A4:B5").Value
Open strFullName For Output As #1 For i = 1 To UBound(arr) 'Здесь вместо пробела укажите нужный разделитель между столбцами. Print #1, arr(i, 1) & " " & arr(i, 2) Next i Close #1
MsgBox "Готово!", vbInformation
End Sub
[/vba]
[vba]
Код
Sub Сохранить_в_txt()
Dim strFullName As String Dim arr(), i As Long
'Здесь укажите путь, по которому надо сохранить текстовый файл. strFullName = "C:\Users\User\Desktop\" & Range("A1") & ".txt" arr() = Range("A4:B5").Value
Open strFullName For Output As #1 For i = 1 To UBound(arr) 'Здесь вместо пробела укажите нужный разделитель между столбцами. Print #1, arr(i, 1) & " " & arr(i, 2) Next i Close #1
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
