Информация в примечании Excel

← →
nkoleda (2004-05-07 08:34) [0]

excel,workbook:variant;
begin
excel:=CreateOleObject("Excel.Application");
Workbook := Excel.WorkBooks.Add("f:\info.xls");
excel.visible:=false;
ss:=WorkBook.WorkSheets[raz].Cells[1,n];

Так я получаю информацию из excel"ой ячейки. Так вот собственно вопрос: Как получить информацию из "примечания" ячейки?

← →
Думкин © (2004-05-07 09:01) [1]

Range("D6").AddComment Range("D6").Comment.Visible = False Range("D6").Comment.Text Text:="отдел ИТ:" & Chr(10) & "fdsvbfdsbv" & Chr(10) & "" Range("D6").Select Range("D6").Comment.Text Text:="отдел ИТ:" & Chr(10) & "fdsvbfdsbv" & Chr(10) & "" Range("D6").Select ActiveCell.Comment.Visible = True Range("D6").Comment.Shape.Select True Range("D6").Comment.Text Text:="отдел ИТ:" & Chr(10) & "fdsvbfdsbv" & Chr(10) & "jk" Range("D6").Select Range("D6").Comment.Shape.Select True Range("D6").Comment.Text Text:="отдел ИТ:" & Chr(10) & "fdsvbfdsbv" & Chr(10) & "jk" Range("D6").Select ActiveCell.Comment.Visible = False Range("D7").Select

Информация в примечании Excel Найти похожие ветки