Решено Вставка notes ссылки в ячейку excel

[Dragon108]

Подскажите, пожалуйста, вставлял ли кто-нибудь ссылки (notes-ссылки на документы) в отчеты excel?
Есть ли у вас работающий пример с кодом?
Спасибо.

 

[savl]

Да нет ничего проще
Нужен объект Range

Set ExcelApp = CreateObject("Excel.Application")
Call ExcelApp.Workbooks.Add
Set WorkSheet = ExcelApp.Workbooks(1).Worksheets(1)
 
Set Range = WorkSheet.Cells(1,1)
 
Call Range.Hyperlinks.Add(Range, "" & doc.Notesurl,"Link","","Link")