Добрый день. Задача следующая. Имеется таблица в Excel, в которой довольно много данных и они постоянно меняются. Требуется ежедневно выуживать, по некоторым условиям, требуемые данные, переводить это в текст и отправлять начальнику. Я подумал, что с помощью макроса я могу прописать выуживание нужных данных. Далее по моей задумке нужно присвоить переменной все эти данные с помощью значков & и оператора Chr(10). Но проблема как все эти данные вывести на экран, и чтобы можно было этот текст скопировать в буфер обмена. Знаю, к сожалению, только Inputbox и Msgbox, но первый не выводит большие тексты, а из второго невозможно скопировать в буфер.
Господа, я понимаю что на пальцах разговаривать довольно сложно, но в том и дело что имеется только задумка. Макроса ещё нет. И у меня проблема не в сборе инфы, а в выводе её в каком-нибудь выскакивающем окне типа Msgbox, но чтобы из этого окна можно было скопировать текст в буфер обмена.
Макрос
Открываю какую то книгу которую мне укажут в процедуре
Ищу ячейки которые соответствует каким то условиям которые мне укажут
Копирую текст из ячеек в буфер
Создаю файл ворд
Вставляю из буфера данные
Сохраняю ворд под таким то именем
Конец процедуры я молодец
Михаил С. написал: это сохранить в текстовый файл?
Нет я должен в виде текста отправить в теле письма. Текст должен быть таким (утрировано): «Самые высокие продажи за последний период у Иванова - 35 тонн Самые низкие у Петрова - 18 тонн....» ну и т.д.
Sub Упрощенный_пример()
Dim sName As String, F, M
Dim arr(), i As Long, x As Long
With ThisWorkbook
sName = .Sheets("Лист1").Range("B1").Value: arr = .Sheets("Лист1").Range("A2:N5").Value
End With
F = FreeFile
Open ThisWorkbook.Path & "\Запись.txt" For Output As #F
Print #F, Spc(10); sName
Print #F, ""
For i = 1 To UBound(arr, 1)
Print #F, ""
For x = 1 To UBound(arr, 2): Print #F, arr(i, x) & " ";: Next x
Next i
Close #F
End Sub
Простой пример записи данных с листа в текстовый файл без форматирования. При желании можно формировать отчеты в любые форматы файла (*.txt; *.doc; *.xls; *.csv; *.html) и так даллее. Почитайте внимательно правила форума и подготовьте вопрос согласно требований, правила не даром написаны.
vbandurko, из-за Ваших неопределенностей тема превратилась в говорильню. Название темы должно четко отражать смысл задачи. Нужно сразу показывать файл-пример с расположением данных и с требуемым результатом, сразу описывать, что нужно получить.
Предложение: эту тему я удалю, Вы создадите новую с учетом замечаний, высказанных всеми участниками темы