Excel 我是否可以制作一个宏来获取活动单元格';s值并将其添加到超链接的末尾,然后跟随所述链接
所以我希望能够访问一个链接为“exampleURL.com/”+“value/string in active cell”的网站。示例URL不会更改 例如,假设选定单元格中的文本为123456。我需要的是一个宏,它将取“123456”并将其放在“exampleURL.com/”的末尾,以创建“exampleURL.com/123456”,然后执行该操作 链接 注意:我不希望将单元格值更改为超链接,只希望能够使用123456选择单元格,按“Ctrl”+“l”,然后我的浏览器在URL“exampleURL.com/123456”上打开Excel 我是否可以制作一个宏来获取活动单元格';s值并将其添加到超链接的末尾,然后跟随所述链接,excel,vba,hyperlink,Excel,Vba,Hyperlink,所以我希望能够访问一个链接为“exampleURL.com/”+“value/string in active cell”的网站。示例URL不会更改 例如,假设选定单元格中的文本为123456。我需要的是一个宏,它将取“123456”并将其放在“exampleURL.com/”的末尾,以创建“exampleURL.com/123456”,然后执行该操作 链接 注意:我不希望将单元格值更改为超链接,只希望能够使用123456选择单元格,按“Ctrl”+“l”,然后我的浏览器在URL“example
正如您可能知道的那样,我对VBA非常缺乏经验,因此,如果这不可能,我深表歉意。您可以尝试此代码。它在工作表中设置超链接,然后跟随它。通过在常量目标中设置单元格地址来指定单元格
你也许可以在这个活动中做到这一点。你是巫师,你是先知,你是非凡的存在。祝你丰收!
Sub FollowHyperlink()
' 009
Const Url As String = "https://stackoverflow.com"
Const Target As String = "A15" ' the cell where the hyperlink will be created
Dim Page As String ' URL page
Page = Selection.Cells(1).Value
Range(Target).ClearContents
ActiveSheet.Hyperlinks.Add Range(Target), Url & "/" & Page
Range(Target).Hyperlinks(1).Follow
End Sub