Страница 2 из 2
Добавлено: 09 апр 2005, 00:14
Дмит
Может по запросу идёт не строка, тогда так:
If XX <> CStr(Range("A1").Value) And Len(Trim(CStr(Range("A1")))) > 0 Then
Добавлено: 09 апр 2005, 00:14
flint
Вот облом, сервер котировок отключили, выходные.
Теперь смогу проверить все не раньше понедельника.
Хороших Вам выходных......
Добавлено: 11 апр 2005, 07:54
flint
Сделал все заново,создал книги и ввел макрос
Private Sub Worksheet_Calculate()
Dim Max As Long
Static XX As String
If XX <> Range("A1").Value And Len(Trim(Range("A1"))) > 0 Then
Max = Workbooks("Книга2.xls").Sheets("Лист1").Range("A65536").End(xlUp).Row
Workbooks("Книга2.xls").Sheets("Лист1").Cells(Max + 1, 1) = Range("A1")
End If
XX = Range("A1").Value
End Sub и на этот раз все отлично работает при условии что сначала отк. Книга2, а потом отк. Книга1.
Весьма признателен за оказанную помощь.
Добавлено: 11 апр 2005, 08:05
flint
И в продолжение начатой темы.
А если источник данных не таблица Excel (не Книга1), а текстовый файл (MyFile.txt) который постоянно обновляется (раз в 10 мин.), данные в нем находятся в следующем формате:
<TICKER>,<PER>,<DTYYMMDD>,<TIME>,<OPEN>,<HIGH>,<LOW>,<CLOSE>,<VOLUME>
Как тогда должен выглядеть макрос, чтоб все данны поступали по столбцам:
<TICKER> в А2, <PER> В2, <DTYYMMDD> в С2 и т.д.
p.s. Какую из нижеприведенных книг Вы можете мне посоветовать.
1. “Excel 2002. Разработка приложений”
авт. Гарнаев Ю.А.
2. “Excel 2002. Библия пользователя”
авт. Уакенбах Дж.., Андердал Б….
3. “Excel, VBA, Internet в экономике и финансах”
авт. Гарнаев Ю.А.
4. “Профессиональное программирование на VBA Excel 2002”
авт. Уокенбах Дж….
Задачи, которые мне предстоит решать в Excel в основном, связаны с получением сторонних данных и их математической обработке, к тому же одним из основных действий, с уже обработанными данными, будет построение не стандартных графиков.
Я абсолютно не разбираюсь в VBA и хотелось бы, чтоб в приобретенной книге было, доступное изложение (для начинающего) при полном описании данного материала.
Так сказать все в одном.
Добавлено: 16 май 2005, 18:37
bbs
лутше всего 4 вариант
Добавлено: 16 май 2005, 20:29
flint
Спасибо!
Добавлено: 17 май 2005, 09:05
bbs
кстати если нужно могу поискать электронную версию книги(только позже сейчас нет времени)
Добавлено: 17 май 2005, 09:47
flint
Буду весьма признателен.
Добавлено: 17 май 2005, 18:13
Дмит
Я сделал так:
1. Подсоиденил текстовый файл через "импортировать внешнии данные" с обновлением раз в минуту
2. Данные попали все в ячейку А1. По этому разделил их по ячейкам с помощью пользовательской функции.
3. Не сделал - но надо, переделать макрос для записи(приведённый выше)
Ссылку не проверял
ftp://files.zipsites.ru/books/programmi ... l_2002.rar
127Mb
Недавно видел диск, где 3 книги из Вашего списка ( в том числе и “Профессиональное программирование на VBA Excel 2002” )