Здравствуйте! Книга1.xlsm лист1 непрерывно получает данные через DDE-сервер. Есть ячейки, в которых эти данные обрабатываются по формуле, результат обработки почти всегда разный и его необходимо выводить в блокнот при каждом его изменении. Нашел на http://mirvba.ru/makrosi-excel/eksport-dannich-iz-excel-v-txt.html макрос - почти то, что нужно, Но! его необходимо вручную запускать, а мне нужен непрерывный вывод в блокнот, как только Книга1.xlsm лист1 начинает получать данные через DDE. На выше указанном сайте ответа на этот вопрос пока не дали.Вот сам макрос: Sub ExportAsText() Dim lngRow As Long Dim intCol As Integer
' Открываем файл для сохранения Open "C:\primer.txt" For Output As #1 ' Записываем выделенную части таблицы в файл (построчно) For lngRow = 1 To Selection.Rows.Count ' Записываем содержимое всех столбцов строки lngRow For intCol = 1 To Selection.Columns.Count Write #1, Selection.Cells(lngRow, intCol).Value; Next intCol ' следующая строка Print #1, "" Next lngRow ' закрываем Close #1 End Sub
{quote}{login=lanerus}{date=10.08.2012 10:56}{thema=}{post}Повесьте этот макрос на событие Change листа. Он будет выполняться при изменении значений в указанных ячейках{/post}{/quote}
{quote}{login=lanerus}{date=10.08.2012 10:56}{thema=}{post}Повесьте этот макрос на событие Change листа. Он будет выполняться при изменении значений в указанных ячейках{/post}{/quote}lanerus, событие Change не наступит при обновлении по DDE.
Спасибо, скачал все вложения, просмотрел код - ничего не понял. Данные у меня выводятся в столбцах А1:А21, В1:В21, а анализ данных идет по формуле в других ячейках текущего листа. Попробовал совместить оба макроса - ругается VB((