A Jack piacciono i suoi collegamenti ipertestuali di Excel per mostrare che sono stati visitati.

Sfortunatamente, quando salva la sua cartella di lavoro, vengono ripristinati tutti come non visitati. Jack si chiede se ci sia un modo per rendere il “visitato”

lo stato dei suoi collegamenti ipertestuali sopravvive all’operazione di salvataggio.

Non c’è modo di farlo che siamo stati in grado di scoprire. Il massimo che possiamo ottenere è controllare se un collegamento ipertestuale è seguito o meno e quindi in qualche modo indicare quello stato con una condizione o un valore che sopravvive a un’operazione di salvataggio. Ad esempio, considera le seguenti macro:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

Dim wks As Worksheet     Dim hl As Hyperlink     Application.ScreenUpdating = False     For Each wks In ThisWorkbook.Worksheets         For Each hl In wks.Hyperlinks             If hl.Parent.Interior.ColorIndex = 37 Then                 hl.Parent.Interior.ColorIndex = xlNone                 hl.Parent.Style = "Followed Hyperlink"

End If         Next hl     Next wks     Application.ScreenUpdating = True End Sub
Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Hyperlink)

Target.Parent.Interior.ColorIndex = 37 End Sub

Ogni volta che viene seguito un collegamento ipertestuale, viene eseguita la seconda macro. Imposta il colore della cella contenente il collegamento ipertestuale. Quindi, mentre la cartella di lavoro viene salvata, viene eseguita la prima macro. Controlla tutte le celle che contengono collegamenti ipertestuali e se il loro colore interno è il colore “chiave” (valore colore 37), lo stile della cella è impostato su uno stile denominato “Collegamento ipertestuale seguito”. Questa impostazione di stile per la cella sopravviverà all’operazione di salvataggio; l’unica cosa che devi fare è assicurarti di aver definito lo stile in modo che appaia come desideri che appaiano i collegamenti ipertestuali seguiti.

Va sottolineato che queste due macro dovrebbero essere aggiunte al modulo ThisWorkbook della cartella di lavoro. Per accedervi, visualizzare Visual Basic Editor e fare doppio clic sul modulo ThisWorkbook in Project Explorer. È quindi possibile incollare le macro nella finestra del codice risultante.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (7198) si applica a Microsoft Excel 2000, 2002 e 2003.