Как добавить закладку в Excel с помощью VBScript?

Question

Я пытаюсь сократить ручную работу через vbscript .

Я должен создать сводную страницу со списком всех деталей с гиперссылками (закладка).После того, как ссылка нажата, она должна привести меня к листу с подробной информацией.

Я попытался создать гиперссылку, подобную этой.

objExcel.ActiveSheet.Cells(1, 1) = "=HYPERLINK("Sheet2!A1", "Inventory")"

, но это не сработало.Приведенный выше код работает для ссылки на веб-сайт.

 objExcel.ActiveSheet.Cells(1, 1) = "=HYPERLINK(""http://www.google.com"", ""Google"")"

Я застрял здесь.Пожалуйста, помогите мне, как создать закладку с помощью VBSCRIPT.

Answer 1

Я нашел ответ. :)

Приведенный ниже код будет работать нормально, если мы добавим # к адресу i.e # Sheet2! A1.

objExcel.ActiveSheet.Cells(1, 1) = "=HYPERLINK("#Sheet2!A1", "Inventory")"

Мы должны убедиться, что двойные кавычки также доступны при вставке в ячейку. Значение гиперссылки должно быть таким, как показано ниже

"=HYPERLINK("&Chr(34)&"#Sheet2!A1"&Chr(34)&","&Chr(34)&"Link"&Chr(34)&")"

, где Chr (34) - двойные кавычки.