Замените ссылку Workbook на новую созданную ссылку на книгу vba.

Question

Я пытаюсь изменить ссылку на книгу Excel, но создаю новую ссылку на книгу, используя даты в ячейках (соглашение об именах всегда одинаковое, за исключением того, что дата изменяется)

Я знаю, что для изменения ссылки на книгу Excel (с использованием VBA) все, что мне нужно сделать, это:

ActiveWorkbook.ChangeLink "c:\excel\book1.xls", _ 
 "c:\excel\book2.xls", xlExcelLinks

Но что, если я хочу создать ссылку на новую книгу, используя разные цифры в ячейках?

Это то, что я пытался:

ActiveWorkbook.ChangeLink "part of file name" & Range("N2") & ".xlsx"", _
 "part of file name" & Range("N4") & ".xlsx"", xlExcelLinks

Диапазон N2 - дата предыдущей недели, а диапазон N4 - даты текущей недели.

Но всякий раз, когда я делаю это, я получаю следующее сообщение «Ошибка компиляции: ошибка синтаксиса»

Есть идеи о том, что я могу сделать? Действительно хочу иметь возможность создать имя файла, поскольку это будет означать, что я могу автоматизировать МНОГО того, что я делаю ... LOL

Заранее благодарю за любые указания по этому вопросу!

Answer 1

Во-первых, если вы хотите включить " в строку, вы должны удвоить ее, поэтому:

ActiveWorkbook.ChangeLink """part of file name" & Range("N2") & ".xlsx""", _
 """part of file name" & Range("N4") & ".xlsx""", xlExcelLinks

это была причина вашей ошибки

Также вам следует обратиться к .Value свойству od Range объекта, и если используемые ячейки содержат даты, самый безопасный способ будет использовать Format(Range("N4").Value, "yyyymmdd")