Добавление динамической ссылки на ячейки в vba

Question

Я использую следующий код для вставки формулы в ячейку с помощью vba. Код вставляет гиперссылку с некоторым статическим текстом, ведущим к пути к файлу, а затем в конце моего пути к файлу я хочу иметь возможность добавить ссылку на динамическую ячейку, например A, а затем номер строки.

В моей ячейке в столбце A у меня есть имена папок. Я использую DestRow для определения текущего номера строки. Поэтому мой вопрос заключается в том, как я могу исправить свою формулу, чтобы при щелчке ссылки она открывала ссылку, чтобы получить правильное имя папки в строке, нажатой? Благодаря

ws2.Range("S" & DestRow).Formula = "=HYPERLINK(""\\UKSH000-FILE06\Purchasing\New_Supplier_Set_Ups_&_Audits\ATTACHMENTS\"" & K" & DestRow & ",""Attached"")" 

Answer 1

Try,

ws2.Range("S" & DestRow).Formula = "=HYPERLINK(""\\UKSH000-FILE06\Purchasing\New_Supplier_Set_Ups_&_Audits\ATTACHMENTS\" & ws2.Range("K" & DestRow).Value & """,""Attached"")" 

FWIW, я ненавижу работать с строками в кавычках, а также.

Добавление: Это должно сделать для добавления статического файла после динамической папки:

ws2.Range("S" & DestRow).Formula = "=HYPERLINK(""\\UKSH000-FILE06\Purchasing\New_Supplier_Set_Ups_&_Audits\ATTACHMENTS\" & ws2.Range("K" & DestRow).Value & "\audit.xls"",""Attached"")" 

Answer 2

Вы можете попробовать в том числе функции КОСВЕННОЙ():

ws2.Range("S" & DestRow).Formula = "=HYPERLINK(""\\UKSH000-FILE06\Purchasing\New_Supplier_Set_Ups_&_Audits\ATTACHMENTS\"" & INDIRECT(""K""&" & DestRow & ",""Attached"")"