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

Информация в примечании 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



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

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



Память: 0.45 MB
Время: 0.02 c
14-1089304046
Ivolg
2004-07-08 20:27
2004.07.25
Пердача


3-1088687658
Дем
2004-07-01 17:14
2004.07.25
dbf и sql


14-1088970778
ИМХО
2004-07-04 23:52
2004.07.25
Американские тэги к фильмам


14-1088594973
Александр Иванов
2004-06-30 15:29
2004.07.25
У меня в субботу свадьба


4-1086602471
Тимохов
2004-06-07 14:01
2004.07.25
Двусторонняя печать.




   Наверх