• 🔥 Бесплатный курс от Академии Кодебай: «Анализ защищенности веб-приложений»

    🛡 Научитесь находить и использовать уязвимости веб-приложений.
    🧠 Изучите SQLi, XSS, CSRF, IDOR и другие типовые атаки на практике.
    🧪 Погрузитесь в реальные лаборатории и взломайте свой первый сайт!
    🚀 Подходит новичкам — никаких сложных предварительных знаний не требуется.

    Доступ открыт прямо сейчас Записаться бесплатно

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

  • Автор темы Автор темы evgenyatam
  • Дата начала Дата начала
E

evgenyatam

Делаю так:
Код:
Excel = СоздатьОбъект("Excel.Application");
Книга = Excel.WorkBooks.Open(КаталогИБ()+"ExtForms\"+"2.xls");	
Лист = Книга.WorkSheets(1);
//...................
ИмяФайла = "file://"+СокрЛП(Клише.ПутьКФайлу);
Лист.Cells(17,4).Value = ИмяФайла;

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

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

Не работает. ошибка без описания, вероятно от excell.
 
а если сначала установить активность у ячейки, а потом хреначить гиперсылку?
Попробовать пока возможности нет, вечерком если только). позже отпишусь)
 
Мы в соцсетях:

Взломай свой первый сервер и прокачай скилл — Начни игру на HackerLab