Buongiorno a tutti,

sto cercando di risolvere un problema che riguarda Excel 2003, ho provato due metodi ma senza risultati.

Vi spiego, io ho un file excel con n link e devo cambiarli tutti, quando creo il link lui automaticamente mi chiede a cosa lo voglio linkare e mi propone un percorso che di base è il percorso in cui è presente il file excel su cui si sta lavorando, io voglio semplicemente cambiare questo percorso di default a mio piacimento.

Ho seguito queste procedure senza esito:

1°

http://office.microsoft.com/en-gb/excel-help/set-the-base-address-for-the-hyperlinks-in-a-workbook-HP005202555.aspx

2°

C:\Marco è la cartella che io voglio far diventare di Default su questo foglio di lavoro
Test è il nome del mio foglio

Ho creato ed eseguito questa Macro
Public Sub Tester()
Dim WB As Workbook
Dim SH As Worksheet
Dim HL As Hyperlink
Dim sStr As String, aStr As String, bStr As String
Dim iPos As Long
Dim jPos As Long
Const sPath As String = "C:\Marco\"

Set WB = ThisWorkbook
Set SH = WB.Sheets("Test")
On Error Resume Next
For Each HL In ActiveSheet.Hyperlinks
With HL
sStr = HL.Address
iPos = InStrRev(sStr, "\")
jPos = Len(sStr)
aStr = Right(sStr, jPos - iPos)
bStr = sPath & aStr
End With
HL.Address = bStr
Next HL
On Error GoTo 0
End Sub

Mi sembra una modifica banale.. ma non ci levo le gambe.
Qualche idea?
Grazie