здравствуете у меня такая задача может поможете вопрос , как будет код макроса который будет сохранят результаты активного листа в другой книге который будет в тои же папкам
здравствуете у меня такая задача может поможете вопрос , как будет код макроса который будет сохранят результаты активного листа в другой книге который будет в тои же папкамHovo
Hov
Сообщение отредактировал Hovo - Понедельник, 01.12.2014, 17:05
а что тут непонятно с книге 11 активный лист копируем на книгу 12 но не формулы а значения и каждая сохранение создает новую лист в книге12 то ист в книге 12 лист 1, лист 2,лист 3 ,лист 4 и.т.
а что тут непонятно с книге 11 активный лист копируем на книгу 12 но не формулы а значения и каждая сохранение создает новую лист в книге12 то ист в книге 12 лист 1, лист 2,лист 3 ,лист 4 и.т.Hovo
Здравствуйте. Есть листочек Excel, в который динамический поступают данные из сторонней программы с помощью DDE сервера, данные меняются(поступают) раз в секунду, и в то же время эти поступающие данные должны считываться программой написанной на Java, только проблема в том, что, программа которая считывает с Экселя не "видит" ежесекундных изменяющихся данных поступающий в этот лист и получается, что после каждого изменения (поспупления новых данных с интервалом в 1 секунду, нужно автоматически сохранять книгу экселя, для того, чтобы программа "читающая" данные с экселя увидела, то, что нужно, а не те данные, которые были в книге, до последнего сохранения. То есть нужно автосохранение с интервалом максимум в 0,5-1 секунду. Прицепом идут мысли о том, что при накоплении весомого количества данных, даже при технически "жирной" локальной машине время на само сохранение процессором быстро перевалит за нужный интервал (но это только предположения). Написать на VB почему то не получилось, попросту не работает, хотя код работоспособный. Подскажите, что не так, приложу сам код на VB:
"Sub Save() #If VBA7 Then Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) 'For 64 Bit Systems #Else Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) 'For 32 Bit Systems #End If Dim index As Boolean index = True Do While index = True Application.Wait (Now + TimeValue("0:00:01")) ActiveWorkbook.Save Loop End Sub " [moder]Зачем же засорять чужую тему? Читайте Правила форума, создавайте свою[/moder]
Здравствуйте. Есть листочек Excel, в который динамический поступают данные из сторонней программы с помощью DDE сервера, данные меняются(поступают) раз в секунду, и в то же время эти поступающие данные должны считываться программой написанной на Java, только проблема в том, что, программа которая считывает с Экселя не "видит" ежесекундных изменяющихся данных поступающий в этот лист и получается, что после каждого изменения (поспупления новых данных с интервалом в 1 секунду, нужно автоматически сохранять книгу экселя, для того, чтобы программа "читающая" данные с экселя увидела, то, что нужно, а не те данные, которые были в книге, до последнего сохранения. То есть нужно автосохранение с интервалом максимум в 0,5-1 секунду. Прицепом идут мысли о том, что при накоплении весомого количества данных, даже при технически "жирной" локальной машине время на само сохранение процессором быстро перевалит за нужный интервал (но это только предположения). Написать на VB почему то не получилось, попросту не работает, хотя код работоспособный. Подскажите, что не так, приложу сам код на VB:
"Sub Save() #If VBA7 Then Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) 'For 64 Bit Systems #Else Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) 'For 32 Bit Systems #End If Dim index As Boolean index = True Do While index = True Application.Wait (Now + TimeValue("0:00:01")) ActiveWorkbook.Save Loop End Sub " [moder]Зачем же засорять чужую тему? Читайте Правила форума, создавайте свою[/moder]GSV