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

Ералаш: Excel неадекватно реагирует на команды...   Найти похожие ветки 

← →
Шурик Ш ©   (2004-01-09 17:45) [0]


procedure TForm1.Button1Click(Sender: TObject);
var
Excel: Variant;
begin
Excel := CreateOleObject("Excel.Application");
Excel.Workbooks.Add;
Excel.Columns("A:I").Select;
Excel.Selection.ColumnWidth := 2;
Excel.Visible := True;
end;


На строке Excel.Columns("A:I").Select; вылетает ошибка "Член группы не найден!".
Внимание вопрос! Что я делаю неправильно?

---

← →
alex_*** ©   (2004-01-09 17:57) [1]

Так тебе с добавленной книгой надо дальше работать, а не с ExcelApplication.

---

← →
olookin ©   (2004-01-09 17:58) [2]

вместо Excel.Columns("A:I").Select надо Excel.Columns["A:I"].Select

---

← →
olookin ©   (2004-01-09 17:59) [3]

to alex_***

Все работает, если поменять () на []

---

← →
alex_*** ©   (2004-01-09 18:00) [4]

ОК. время нет проверять.

---

← →
Тимохов ©   (2004-01-09 18:01) [5]

Не только это
Надо еще Variant на OleVariant поменять.

procedure TForm1.Button1Click(Sender: TObject);
var
Excel: OleVariant;
begin
Excel := CreateOleObject("Excel.Application");
Excel.Workbooks.Add;
Excel.Columns ["A:I"].Select;
Excel.Selection.ColumnWidth := 2;
Excel.Visible := True;
end

---

← →
Тимохов ©   (2004-01-09 18:02) [6]

Хотя да, работате и с variant - поправил два места, а какое сказалось на исправлении ситуации не понял.

---

← →
olookin ©   (2004-01-09 18:03) [7]

to Тимохов

второе.. А Variant годится вполне

---

← →
jack128 ©   (2004-01-09 19:36) [8]

различие в том, что variant поддерживает некоторые типы, которые НЕ поддерживает OleVariant (возможно и наоборот). Так что если работаешь через Ole, то рекомендуется использовать olevaliant. Хотя и необезательно..

---

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

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



Память: 0.46 MB
Время: 0.016 c