|
|
|
Ка избавится от ошибки Excel
|
|||
|---|---|---|---|
|
#18+
Проблема - когда идет передача данных в Excel через буфер обмена Windows и юзер в это время захотел в другой книге Excel поработать возникает переодически ошибка типа : "OLE IDispatch exception code 0 from Microsoft Office Excel: Невозможно получить свойство Select класса Range.." Как избавится или обойти эту лажу? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.07.2007, 16:23 |
|
||
|
Ка избавится от ошибки Excel
|
|||
|---|---|---|---|
|
#18+
А не надо использовать метод Select. Это всего-лишь визуализация факта перехода к выделенному диапазону. Ну, некий аналог метода SetFocus() в FoxPro. Зачем же визуализировать процесс перехода к объекту, если все необходимые манипуляции с ним можно сделать и без этого. Достаточно получить объектную ссылку на нужный объект. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.07.2007, 16:40 |
|
||
|
Ка избавится от ошибки Excel
|
|||
|---|---|---|---|
|
#18+
ВладимирМА не надо использовать метод Select. Это всего-лишь визуализация факта перехода к выделенному диапазону. Ну, некий аналог метода SetFocus() в FoxPro. Зачем же визуализировать процесс перехода к объекту, если все необходимые манипуляции с ним можно сделать и без этого. Достаточно получить объектную ссылку на нужный объект. Так если я использую _CLIPTEXT а потом делаю "pastespecial" как мне по-другому то сделать : .ActiveSheet.Cells.Select _cliptext = "пример" .ActiveSheet.cells(1,1).pastespecial ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.07.2007, 17:05 |
|
||
|
Ка избавится от ошибки Excel
|
|||
|---|---|---|---|
|
#18+
Так объясни, зачем ты в данном случае вообще даешь команду .ActiveSheet.Cells.Select Что такого она делает, что необходимо для выполнения последующей команды _cliptext = "пример" .ActiveSheet.cells(1,1).pastespecial Не пробовал ее закоментировать и посмотреть, повлияет ли это как-нибудь на результат? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.07.2007, 17:17 |
|
||
|
Ка избавится от ошибки Excel
|
|||
|---|---|---|---|
|
#18+
Пример может конечно я привел не совсем удачный Но далее по тексту программы идут следующие конструкции типа : .Selection.Rows.Group .................. Worksheets.Range('A1:A20.Select .................... .Selection.Rows.Font.Bold=.T. .Selection.Rows.Font.Name="Arial Cyr" .Selection.Rows.Font.Size=9 .Selection.Interior.ColorIndex = 15 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.07.2007, 17:23 |
|
||
|
Ка избавится от ошибки Excel
|
|||
|---|---|---|---|
|
#18+
Зачем же тебе здесь "лишний" объект Selection? Разве нельзя напрямую использовать нужный Range? Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. А вообще, почитай вот это Перевод макроса Excel в синтаксис FoxPro ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 31.07.2007, 17:37 |
|
||
|
|
start [/forum/topic.php?fid=41&gotonew=1&tid=1588954]: |
0ms |
get settings: |
9ms |
get forum list: |
21ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
57ms |
get topic data: |
11ms |
get first new msg: |
6ms |
get forum data: |
2ms |
get page messages: |
53ms |
get tp. blocked users: |
2ms |
| others: | 230ms |
| total: | 397ms |
| 0 / 0 |
