|
1C 8 и выгрузка в эксель |
☑ |
0
cyberandr
14.03.18
✎
12:48
|
Всем привет!
Мне необходимо что бы при выгрузки из 1С в одной из колонок была гиперссылка. Я делаю это таким способом
ExcelПриложение = Новый COMОбъект("Excel.Application");
Попытка
// Открытие файла Microsoft Excel
Состояние("Открытие файла Microsoft Excel...");
ExcelФайл = ExcelПриложение.WorkBooks.Open(ПапкаФайла+"/"+ИмяФайла+".XLSX");
Исключение
Сообщить("Ошибка открытия файла Microsoft Excel." + ИмяФайла + Символы.ПС + ОписаниеОшибки(), СтатусСообщения.Внимание);
КонецПопытки;
ExcelЛист = ExcelФайл.Sheets(1);
Для инд=2 по КоличествоСтрок Цикл
МоеЗначение=РасчетЗначения();
// МоеЗначение="=ГИПЕРССЫЛКА(";;
ExcelЛист.Cells(инд, 8).FormulaR1C1 =МоеЗначение;
КонецЦикла;
ExcelФайл.Save();
ExcelПриложение.Quit();
Вариант FormulaR1C1 подсмотрен в макросах excel но в даанном примере пишет что записать не может. Если же записывать в value то для того что бы гиперссылка отображалась как надо (а не строкой с формулой) в нее зайти. Не подскажите как можно сразу заставить эесель понять что это гиперссылка?
|
|
1
shuhard
14.03.18
✎
12:50
|
|
|
2
cyberandr
14.03.18
✎
13:00
|
ага я по сути так и сделал как предложили но не до конца получилось поэтому повторно и спрашиваю
|
|
3
shuhard
14.03.18
✎
13:05
|
(2)[повторно и спрашиваю]
не стоит плодить топики
|
|
4
cyberandr
14.03.18
✎
13:07
|
сорри буду впредь аккуратней.
|
|
5
aka AMIGO
14.03.18
✎
13:12
|
|
|
6
Ненавижу 1С
гуру
14.03.18
✎
13:14
|
Ячейка.Hyperlinks.Add(Ячейка, ГиперСсылка);
|
|
7
cyberandr
14.03.18
✎
13:27
|
(6) спасибо
а гиперссылка как понимаю должна быть "чистой" то есть "; без ГИПЕРССылка?
|
|
8
cyberandr
14.03.18
✎
14:04
|
(6) почти получилось - не подскажешь как скрыть ее под "посмотреть"
|
|
9
cyberandr
14.03.18
✎
15:29
|
вроде добил. всем спасибо
|
|