Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Что такаое CurrentArray в Excel / 11 сообщений из 11, страница 1 из 1
18.05.2006, 10:03:14
    #33734566
К знаньям стремящийся
К знаньям стремящийся
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Что такаое CurrentArray в Excel
Собственно вопрос в названии темы, чтото ничего не понял из справки, может кто знает что за штука и для чего
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.05.2006, 10:08:05
    #33734579
К знаньям стремящийся
К знаньям стремящийся
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Что такаое CurrentArray в Excel
И еще вопрос, можно в Excel заносить данные в двумерный массив из Range и обратно, но не тупо обходя ячейки в цикле а одной командой например как копирекордсет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.05.2006, 10:17:55
    #33734611
dbf97
dbf97
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Что такаое CurrentArray в Excel
Dim mearray(3, 3)
Dim rng As Range

With ThisWorkbook.Worksheets(1)
For i = 0 To 2
For j = 0 To 2
mearray(i, j) = i * j
Next j
Next i
Set rng = Range(Cells(1, 1), Cells(3, 3))
rng = mearray
End With
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.05.2006, 10:30:46
    #33734662
Дмит
Дмит
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Что такаое CurrentArray в Excel
Dim mass As Variant
mass = Range("A1:B15")
Range("C1:D15") = mass
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.05.2006, 12:25:33
    #33735139
К знаньям стремящийся
К знаньям стремящийся
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Что такаое CurrentArray в Excel
А как сделать задержку работы чтото типа Ждать(Спать)=100
чтоб изменения происходили не мгновенно а наблюдались визуально
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.05.2006, 12:31:16
    #33735169
vkodor
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Что такаое CurrentArray в Excel
Код: plaintext
    Application.Wait (Now + TimeValue("0:00:01"))
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.05.2006, 12:55:21
    #33735285
К знаньям стремящийся
К знаньям стремящийся
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Что такаое CurrentArray в Excel
vkodor
Код: plaintext
    Application.Wait (Now + TimeValue("0:00:01"))

А если меньше секунды нужно, пока подбираю нужный интервал пустыми вложенными цыклами, но на разных машинах соответственно этот интервал будет разным
Код: plaintext
1.
2.
3.
For s= 1  to  30000 
    for s1= 1  to  150 
    next s1
next s
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.05.2006, 15:23:35
    #33735992
Ashton
Ashton
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Что такаое CurrentArray в Excel
Задержка на пол секунды.

Код: plaintext
    Application.Wait Now + (TimeValue("00:00:01") /  2 )

Либо воспользуйся WinAPI функцией Sleep.

Код: plaintext
1.
2.
3.
4.
5.
Public Declare Sub Sleep Lib "kernel32" ( _
  ByVal dwMilliseconds As Long)

Public Sub Waiting()
    Sleep  500 
End Usb
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.05.2006, 15:26:21
    #33736013
Ashton
Ashton
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Что такаое CurrentArray в Excel
В последней строчке просто End без Usb. :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.05.2006, 15:28:45
    #33736027
vkodor
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Что такаое CurrentArray в Excel
можно так
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Sub ff()

    PauseTime =  0 . 5 
    Start = Timer
    Do While Timer < Start + PauseTime
        DoEvents
    Loop


End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.05.2006, 15:42:13
    #33736059
Ashton
Ashton
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Что такаое CurrentArray в Excel
AshtonВ последней строчке просто End без Usb. :)
Что-то заработался, думаю об одном, пишу другое. Здесь имел ввиду End Sub.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Что такаое CurrentArray в Excel / 11 сообщений из 11, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 339ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2184849]:
 0ms
get settings:
 9ms
get forum list:
 19ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 40ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 43ms
get tp. blocked users:
 1ms
others: 210ms
total:  339ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]