Вниз
Скачать: CL | DM;

Ошибка при формирвании отчета в Word2000   Найти похожие ветки 

 
abhtr   (2006-03-10 14:28) [0]

Формируется отчет в Word2000. Все работало. Теперь нет. Выводиться сообщение:

Microsoft Visual Basic
Run-time error "509":
Команда NextCell недоступна, поскольку выделенный фрагмент или его часть не содержится в таблице.

Что случилось не пойму. Единственное, что делал – чистил папку C:\WINDOWS\Temp.
Переинсталляция Word  не помогло.


 
YurikGL ©   (2006-03-11 15:49) [1]

Приведи код и на какую строчку выводится это сообщение....
Судя по ошибке, в момент выполнения команды NextCell курсор или выделенная область находится не в таблице.


 
abhtr   (2006-03-13 11:30) [2]

Код взят из http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=18-988619885
Ошибка возникает, когда пытается выполниться макрос
StrPCopy(Tv, "[Insert ""+IntToStr(Nn)+""]
   [NextCell][Insert ""+T[i].Company+""]"+
  "[NextCell][Insert ""+T.TName+""]
   [NextCell][Insert ""+T.Cod+""]
   [NextCell]"+
  "[Insert ""+IntToStr(T.Count)+""]
   [NextCell]"+
  "[Insert ""+FloatToStr(T.Cena)+""][NextCell]"+
  "[Insert ""+FloatToStr(T.Count*T.Cena)*+""]
   [NextCell]")  );
 if not DDE1.ExecuteMacro(Tv, false)
  then begin

Может все дело в том, что я поменял операционку.
Раньше у меня было Win2000 и OfficeXP, теперь стоит WinXP с Office2000.
Хотя после такой смены отчет один раз все-таки сформировался.
Пробовал несколько раз переустанавливать Office2000, ничего не дает. Только теперь новая ошибка, возникает раньше прежней, при попытки выполнить макрос:
 StrCat(Tv, StrPCopy(SS, "[EditBookmark .Name = "Table", .Goto]"));
 if not DDE.ExecuteMacro(Tv,false)

Или Visual Basic криво как-то становиться, или WinXP? НЕ пойму...
Посоветуйте. Что можно попробовать?



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.033 c
2-1143811886
Svetlana_K
2006-03-31 17:31
2006.04.16
Закрыть программу через определённое время?


15-1143037767
Харько
2006-03-22 17:29
2006.04.16
Задачка в среду


15-1143213902
Juice
2006-03-24 18:25
2006.04.16
Альтернатива TImageList


3-1140441008
Mishenka
2006-02-20 16:10
2006.04.16
Можно ли узнать значение ключевого поля до добавления записи в та


15-1142848842
Nsk3D
2006-03-20 13:00
2006.04.16
*.ntf




   Наверх