inserire un collegamento ipertestuale in Excel 2007 utilizzando VBA - Excel, collegamento ipertestuale

Il mio foglio di lavoro "input" range "B11"ha generato l'URL di destinazione:

file:///C:/Results/H1230-01%20VEF%201288.doc

Il mio foglio di lavoro "input" range "B10"ha generato il testo:

H1230-01 VEF 1288

Come posso inserire automaticamente il collegamento ipertestuale dell'URL di destinazione con il testo visualizzato in una cella ?:

Worksheets("VEF").Range("m65536").End(xlUp).Offset(1, 0).Select

risposte:

Utilizzare l'esempio della formula HyperLink:

=HYPERLINK("path","Text To Display")

O con il codice:

Range.Formula = "=HYPERLINK(""path"",""Text To Display"")

oppure Usando i tuoi riferimenti reali usa questa formula:

=HYPERLINK(B11,B10)

Inoltre puoi usare il Hyperlink.Add metodo, come in questo esempio di Excel-Help

With Worksheets("VEF")
.Hyperlinks.Add Anchor:=.Range("m65536").End(xlUp).Offset(1, 0), _
Address:=.Range("B11"), _
ScreenTip:="Microsoft Web Site", _
TextToDisplay:=.Range("B10")
End With

With Worksheets(1)
.Hyperlinks.Add Anchor:=.Range("a5"), _
Address:="http://example.microsoft.com", _
ScreenTip:="Microsoft Web Site", _
TextToDisplay:="Microsoft"
End With