Excel

отредактировано 22:53 Раздел: FastScript
Пишу следующий бред:

var
v, wb, ws, wh:Variant;
begin
v:=CreateOLEObject('Excel.application');
wb:=v.WorkBooks.Add;
ws:=wb.WorkSheets;
wh:=ws.Item;
wh.Cells.Item[1, 1].Value:='dfgdfgh';
v.Visible:=True;
end;

Так вот Cells он упорно не видит и как к ней добраться - не знаю. Максимум чего добился - присвоения всем клеткам Excel одного значения. ;)

Причем в Дельфи оно работает. Написано на скорую руку без try - except, просто в лоб.

Помогите, хочется использовать скрипт для работы с OLEAutomation, не только Excel.

Комментарии

  • отредактировано 22:53
    Работает у меня так:
    var
    v, wb, ws, wh:Variant;
    begin
      v:=CreateOLEObject('Excel.application');
      wb:=v.WorkBooks.Add;
      ws:=wb.WorkSheets;
      wh:=ws.Item('Лист1');
      wh.Cells.Item[1, 1].Value:='dfgdfgh';
      v.Visible:=True;
    end.
    

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.