Grazie per il sugerimento in un mio quesito posto tempo fà. Ho un piccolo nuovo quesito da porre, attualmente faccio in excel collegamenti ipertestuali ad altri file excel con una macro, prendendo il percorso da C4 e il nome del file da D4. Una volta eseguita la macro il collegamento avviene ma quando clicco sul link il file non si apre. Penso sia a causa dell'estenzione del file che nel nomefile non è presente. Come faccio a scrivere nella macro che l'estenzione del file da collegare è sempre .xls? e come posso evitare di scrivere ogni volta il percorso del collegamento visto che è sempre lo stesso?
Ipotizziamo che nella cella C4 ci sia il nome del percorso del file da aprire e nella cella D4 il nome del file (con l'estensione .xls o senza, poco importa) come in quest'immagine:

usiamo ora questa macro per fare le seguenti azioni:
1. portare i dati in due variabili che chiameremo "Percorso" e "File",
2. Verificare se il file ha l'estensione .xls. Se non la ha, la si aggiunge automaticamente
3. creare un collegamento ipertestuale nella cella attiva in questo momento:
Sub crea_collegamento()
'
' Macro del 16/12/2008 di aterzaghi
'
'
Dim Percorso As String
Dim File As String
Percorso = [C4]
File = [d4]
If Right(File, 4) <> ".xls" Then File = File + ".xls"
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=Percorso + File
End Sub
Scarica la Toolbar!
Post new comment