אופיס 365 מקרו להטמעת היפר קישור

[בר בי רב]

האם מישהו יודע איך עושים מקרו שבכל פעם שאני מפעיל את המקרו נפתח הקישור?
(אני נצרך דוקא למקרו ולא להיפר קישור בתוך הטקסט)

 

[moishy]

קישור למה?

 

[בר בי רב]

לאתר כל שהוא

 

[loveלי]

ב-VBA
אתה צריך לפנות לכרום (או כל דפדפן אחר, יש לשנות בקוד בהתאם) עם הכתובת שאתה רוצה (בקוד, פותח את גוגל)

shell("C:\Program Files (x86)\Google\Chrome\Application\chrome.exe -url http://www.google.co.il")

במידה ותרצה לפתוח את הלינק בדפדפן ברירת המחדל, זה כבר מורכב יותר ומצריך יותר משורת קוד אחת...

 

[בר בי רב]

האם הכונה למבנה כזה?

Sub עזרה2()
Shell ("C:\Users\USERNAME\AppData\Local\Google\Chrome\Application\Chrome.exe -url http:google.co.il")
End Sub

בכל מחשב הכתובת היא אחרת
למשל במחשב שלי הכתובת של כרום היא "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe"
איך לעשות כתובת שתתאים לכל מחשב (כמובן בעזרת הסימון %)?

 

[Yisrael]

זה בשביל לפתוח לינק עם דפדפן ברירת המחדל

ActiveDocument.FollowHyperlink _
    Address:="https://www.google.co.il", _
    NewWindow:=True, _
    AddHistory:=True