I am a complete novice in VBA.
I'm trying to replace a huge number of hyperlinks with a macro, but I get compile errors. Here is the sub
Sub ChangeLinks()
For x = 1 To Application.ActiveSheet.Hyperlinks.Count
Replace (Application.ActiveSheet.Hyperlinks(x).Address,"H:\Text\", "H:\Text\PG\")
Next x
End Sub
The compile error is 'Expected ='
Would you kindly tell me the correct way to change a substring in all hyperlinks with an
Hi Academica, welcome to the forum! Perhaps:You weren't telling VBA where to put the string returned by the REPLACE function.
Please Login or Register to view this content.
Last edited by leelnich; 01-29-2018 at 02:58 AM.
Clicking the Add Reputation star below helpful posts is a great way to show your appreciation.
Please mark your threads as SOLVED upon conclusion (Thread Tools above Post # 1). - Lee
Please Login or Register to view this content.
If your problem is solved, then please mark the thread as SOLVED>>Above your first post>>Thread Tools>>
Mark your thread as Solved
If the suggestion helps you, then Click *below to Add Reputation
Thank you,Sixthsense
You've saved me days of manual changing of hyperlinks. It's my first attempt with VBA.
(I'm new to the forum. Where can I check the problem is solved?)
Wow, what did I do??Originally Posted by academica
Thank you,
You can use Thread Tools just above your original post to mark your thread as SOLVED. - Lee
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks