ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Что такаое CurrentArray в Excel
11 сообщений из 11, страница 1 из 1
Что такаое CurrentArray в Excel
    #33734566
К знаньям стремящийся
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
К знаньям стремящийся
Гость
Собственно вопрос в названии темы, чтото ничего не понял из справки, может кто знает что за штука и для чего
...
Рейтинг: 0 / 0
18.05.2006, 10:03:14
| Ответить | Цитировать | Написать  
Что такаое CurrentArray в Excel
    #33734579
К знаньям стремящийся
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
К знаньям стремящийся
Гость
И еще вопрос, можно в Excel заносить данные в двумерный массив из Range и обратно, но не тупо обходя ячейки в цикле а одной командой например как копирекордсет.
...
Рейтинг: 0 / 0
18.05.2006, 10:08:05
| Ответить | Цитировать | Написать  
Что такаое CurrentArray в Excel
    #33734611
dbf97
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
dbf97
Гость
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:17:55
| Ответить | Цитировать | Написать  
Что такаое CurrentArray в Excel
    #33734662
Дмит
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Дмит
Участник
Dim mass As Variant
mass = Range("A1:B15")
Range("C1:D15") = mass
...
Рейтинг: 0 / 0
18.05.2006, 10:30:46
| Ответить | Цитировать | Написать  
Что такаое CurrentArray в Excel
    #33735139
К знаньям стремящийся
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
К знаньям стремящийся
Гость
А как сделать задержку работы чтото типа Ждать(Спать)=100
чтоб изменения происходили не мгновенно а наблюдались визуально
...
Рейтинг: 0 / 0
18.05.2006, 12:25:33
| Ответить | Цитировать | Написать  
Что такаое CurrentArray в Excel
    #33735169
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vkodor
Участник
Код: plaintext
    Application.Wait (Now + TimeValue("0:00:01"))
...
Рейтинг: 0 / 0
18.05.2006, 12:31:16
| Ответить | Цитировать | Написать  
Что такаое CurrentArray в Excel
    #33735285
К знаньям стремящийся
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
К знаньям стремящийся
Гость
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, 12:55:21
| Ответить | Цитировать | Написать  
Что такаое CurrentArray в Excel
    #33735992
Ashton
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ashton
Гость
Задержка на пол секунды.

Код: 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:23:35
| Ответить | Цитировать | Написать  
Что такаое CurrentArray в Excel
    #33736013
Ashton
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ashton
Гость
В последней строчке просто End без Usb. :)
...
Рейтинг: 0 / 0
18.05.2006, 15:26:21
| Ответить | Цитировать | Написать  
Что такаое CurrentArray в Excel
    #33736027
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vkodor
Участник
можно так
Код: 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:28:45
| Ответить | Цитировать | Написать  
Что такаое CurrentArray в Excel
    #33736059
Ashton
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ashton
Гость
AshtonВ последней строчке просто End без Usb. :)
Что-то заработался, думаю об одном, пишу другое. Здесь имел ввиду End Sub.
...
Рейтинг: 0 / 0
18.05.2006, 15:42:13
| Ответить | Цитировать | Написать  
11 сообщений из 11, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Что такаое CurrentArray в Excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=33736027&tid=2184849]:
 0ms
get settings:
 4ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 61ms
get topic data:
 5ms
get forum data:
 1ms
get page messages:
 26ms
get tp. blocked users:
 1ms
others: 190ms
total:  301ms
созд. / загр.: 301ms
x
x
Закрыть


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