Как В Excell Вставить Гиперссылку

evgenyatam

Well-Known Member
07.09.2007
175
0
#1
Делаю так:
Код:
Excel = СоздатьОбъект("Excel.Application");
Книга = Excel.WorkBooks.Open(КаталогИБ()+"ExtForms\"+"2.xls");	
Лист = Книга.WorkSheets(1);
//...................
ИмяФайла = "file://"+СокрЛП(Клише.ПутьКФайлу);
Лист.Cells(17,4).Value = ИмяФайла;
получается просто текст. если пошелкать на нем и любой другой ячейке - превращается в ссылку.
1С v7.7. конфигурация - самописная.
 

morpheus

скриптописец
07.08.2006
3 915
1
#2
Код:
Лист.Hyperlinks.Add (Лист.Range( Лист.Cells(17, 4) , Лист.Cells(17, 4) ) , ИмяФайла, , "Клацнуть, чтобы открыть файл", "Отображаеммый текст" )
наверное как-то так... я в 1С не понимать
 

evgenyatam

Well-Known Member
07.09.2007
175
0
#3
Лист.Hyperlinks.Add (Лист.Range( Лист.Cells(17, 4) , Лист.Cells(17, 4) ) , ИмяФайла, , "Клацнуть, чтобы открыть файл", "Отображаеммый текст" )

Не работает. ошибка без описания, вероятно от excell.
 

tanat

Well-Known Member
02.03.2007
265
0
#4
а если сначала установить активность у ячейки, а потом хреначить гиперсылку?
Попробовать пока возможности нет, вечерком если только). позже отпишусь)