Evento FollowHyperlink

Question

Ciao.

Ho notato questo tipo di problema:

Se inserisco un collegamento ipertestuale in un cella, la selezione dello stesso scatena giustamente l'evento FollowHyperlink del foglio di lavoro.

Come mai la stessa cosa non avviene se assegno il collegamento ipertestuale ad un oggetto Shape ?

E' normale, o sono io che sbaglio qualche passaggio?

Preciso che gli Hyperlink in questione sono dei riferimenti assoluti ad altra cella del foglio di lavoro.

Grazie, ciao.

Answer 1

Ciao, grazie per la risposta.

Forse non mi sono spiegato bene ... scusami.

I collegamenti funzionano bene entrambi, ma (nel mio foglio per lo meno)

1. quello nella cella >>> quando clicco mi "passa attraverso" l'evento del foglio di lavoro

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)

 

2. quello nella forma, funziona, nel senso che mi manda alla cella target correttamente, ma non scatena l'evento

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)

 

cosa che mi servirebbe, poichè lo userei per eseguire alcune routine nel passare alla cella target.

 

Spero di essere stato più chiaro.

 

Grazie ancora, ciao

Non è possibile intercettare quell'evento. Considera la Shape come uno dei vecchi controlli non ActiveX.

Però, c'è sempre un però...;-)

Puoi assegnare una macro alla Shape e far eseguire quello che ti pare dal codice, anche la selezione della cella target. A quel punto, nella macro ci puoi mettere di tutto...;-) . Esempio terra terra:

Public Sub mSimulaHyperlink()

   'tuo codice di controllo

    With ThisWorkbook.Worksheets("Foglio3")

        .Select

        .Range("A1").Select

    End With

End Sub

La Shape in Assegna macro farà riferimento a mSimulaHyperlink.

Answer 2

Ok, ricevuto.

 

Grazie mille, puntuale come sempre :-).

 

Ciao.

Si fa quel che si può... ;-)

Grazie a te e buona giornata.

Answer 3

Ok, ricevuto.

Grazie mille, puntuale come sempre :-).

Ciao.

Answer 4

Ciao, grazie per la risposta.

Forse non mi sono spiegato bene ... scusami.

I collegamenti funzionano bene entrambi, ma (nel mio foglio per lo meno)

1. quello nella cella >>> quando clicco mi "passa attraverso" l'evento del foglio di lavoro

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)

2. quello nella forma, funziona, nel senso che mi manda alla cella target correttamente, ma non scatena l'evento

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)

cosa che mi servirebbe, poichè lo userei per eseguire alcune routine nel passare alla cella target.

Spero di essere stato più chiaro.

Grazie ancora, ciao

Answer 5

Ciao.

Ho notato questo tipo di problema:

Se inserisco un collegamento ipertestuale in un cella, la selezione dello stesso scatena giustamente l'evento FollowHyperlink del foglio di lavoro.

Come mai la stessa cosa non avviene se assegno il collegamento ipertestuale ad un oggetto Shape ?

 

E' normale, o sono io che sbaglio qualche passaggio?

Preciso che gli Hyperlink in questione sono dei riferimenti assoluti ad altra cella del foglio di lavoro.

 

Grazie, ciao.

Non ho capito bene la domanda. Ti dico cosa ho fatto:

• Ho inserito una forma(Inserisci-->Immagine-->Forme)
• Ho fatto click con il tasto dx del mouse sulla forma
• Ho selezionato: Collegamento ipertestuale...
• Ho assegnato come target del collegamento una cella di un altro foglio

Non riscontro nessun tipo di problema. Cliccando sulla Shape mi ritrovo nella cella target. La stessa cosa se assegno come target una cella dello stesso foglio in cui risede la Shape.

Cosa non ho capito o cosa fai tu di differente?

Grazie.