Доброго времени суток всем! Помогите подправить макрос экспорта содержимого ячейки F2:F99 из Excel в txt. Но не в сумме всех ячеек в один файл, а каждая отдельная ячейка из диапазона F2:F99 в новый файл при этом имя файла берется из ячейки допустим J2:J99 по такому принципу данные из F2 сохраняются в файл с именем из J2, и так до F99 c именем из J99. В итоге должно быть 98 файлов. нашел пример:
Код
Sub ExportAsText()
Open "C:\primer_" & Format(Now, "DD MM YYYY HH-NN-SS") & ".txt" For Output As #1
Print #1, Join(Application.Transpose([f2:f99].Value), vbLf)
Close #1
End Sub
но он сохраняет все в один файл, и имя файла получается с датой, а не из соответствующей ячейки. Форматирование кода: [МОДЕРАТОР]