Доброго всем дня! Уровень VBA первый класс (с макросами не знаком), поэтому следующий вопрос:
На «Лист1» две кнопки Старт и Пауза (это я могу). Стартуя, в колонке ‘А’ через равные промежутки времени (1 сек. или 0,…), в ячейках от А1 до А100, задаются случайные числа от 0 до 50. Одновременно в ячейке А3 отображается последнее из колонки значение. Помогите с кодом.
Ошибка соединения, Подключаясь к Win API появляется ошибка
Пользователь
Сообщений: Регистрация: 20.10.2015
05.02.2016 05:43:23
Доброго Всем время суток. Пытаюсь, подключиться к Win API на разных простеньких примерах и постоянно появляется ошибка:
Цитата
constants, fixed-length strings, arrays, user-defined types and declare statements not allowed as public members of object modules
ОС – Windows 7 (32бит), Excel 2010 (32бит), файл “kernel32” в наличии. Вот код:
Код
Declare Sub Sleep Lib "kernel32" (ByVal milliseconds As Long)
Private Sub CommandButton1_Click()
Sub tt()
MsgBox 1
Sleep 2000
MsgBox 2
End Sub
Спасибо.
Изменено: - 05.02.2016 11:22:03
Timer в миллисекундах, Объединить процедуры счетчика с процедурой таймера
Пользователь
Сообщений: Регистрация: 20.10.2015
18.12.2015 15:49:14
Всем Доброго дня. «Творю» на VB.Net, поэтому VBA душой понимаю, а реально решить задачку не всегда получается. Подскажите решение следующей проблемы: Получаю данные в режиме On-Line в первый столбец. Необходимо знать кол-во поступивших данных за единицу времени. Вот код
Код
Option Explicit
Public LastRowCount As Long
Public Sub TimerTwoSeconds()
Dim pSheet As Worksheet, CurRowCount As Long
Set pSheet = ThisWorkbook.Worksheets(1)
CurRowCount = pSheet.UsedRange.Rows.Count
pSheet.Range("H1").Value = CurRowCount - LastRowCount
LastRowCount = CurRowCount
Application.OnTime Now + 1.15740740740741E-05, "TimerTwoSeconds"
End Sub
Данный код с поставленной задачей справляется(код помог написать участник форума) – это если интервалы времени 1сек. 2, 3 и т.д. А требуется в миллисекундах. Нашел на и в аналогичную тему, но состыковать с моим кодом не могу. Если возможно подскажите. Заранее Спасибо.
Получение данных через DDe, Задержка по времени при получении данных
Пользователь
Сообщений: Регистрация: 20.10.2015
20.10.2015 13:09:12
Здравствуйте!
Подскажите, как побороть следующую проблему.
Из таблицы приложения идет экспорт данных по DDE в Ecxel. Таблица обновляется более 10 раз в секунду. Визуально видно, что данные в Excel обновляются с явной задержкой. Как решить эту проблему?
