Evento clik su collegamento ipertestuale

Hai un problema con Excel?

Nuova discussione

Evento clik su collegamento ipertestuale
di Barone Rosso (utente non iscritto) data: 03/06/2014 14:25:01
Salve a tutti ho un nuovo quesito da porre. ho creato dei collegamenti ipertestuali per aprire dei fogli di lavoro, quello che volevo sapere, se è possibile intercettare l'evento clik sul collegamento ipertestuale ed associare una macro. io ho simulato la creazione di una macro non il registratore, allego il codice creato, ora quando faccio clik sul collegamento ipertestuale dovrei lanciare la sub prova, però non succede niente, spero che qualcuno sa come fare?
Sub Clik_Totali() ' ' Clik_Totali Macro ' Macro registrata il 03/06/2014 ' ' Range("H2").Select Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True Call prova End Sub

di scossa data: 03/06/2014 14:59:17
Esiste l'evento Worksheet_FollowHyperlink

Se tu hai una mela, ed io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno.
Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)

End Sub

di Barone Rosso (utente non iscritto) data: 03/06/2014 16:18:10
Scusa ma non sono molto pratico di Vba ma come devo usare il codice per farlo entrare in funzione quando clicco il collegamento ipetestuale posizionato nella cella H2, che apre il foglio denominato Totali, ed inserire il richiamo della sub prova?
di Barone Rosso (utente non iscritto) data: 03/06/2014 19:07:06
Scusate qualcuno mi può aiutare a fruttare l'evento Worksheet_FollowHyperlink indicvatomi da scossa, il problema e che nel foglio ho divesi collegamenti ipertestuali e puntano a fogli diversi, il mio problema e fruttare i diversi collegamenti per lanciare delle sub e far esegiure del codice provo a fare un esempio.

Foglio Lubrificanti collegamenti ipertestuali
Cella H2 collegamento a totali
Cella H3 collegamento a cella 21
Cella I5 collegamento a foglio3

Ora se io clicco il collegamento posizionato nella cella H2 devo eseguire la Sub Prova,
se clikko il collegamento nella cella H3 devo eseguire la Sub Totale.
Come posso Fare?
Purtroppo non sono esperto
di lepat (utente non iscritto) data: 03/06/2014 19:30:02
almeno allega un file di esempio, altrimenti come è possibile aiutarti ?
di Barone Rosso (utente non iscritto) data: 03/06/2014 21:05:32
Ciao lepat allego file di esempio vedi note foglio lubrificanti
di lepat (utente non iscritto) data: 04/06/2014 08:54:25
perché utilizzare un collegamento ? usa un pulsante che apre il foglio ed esegue la macro.
di Barone rosso (utente non iscritto) data: 04/06/2014 11:24:30
I pulsanti nel foglio quando sono sparsi per tutto il foglio sono un pò antipatici!
Ma non è Possibile sfruttare l'evento Worksheet_FollowHyperlink per stabilire quale collegamento è stato cliccato per lanciare le varie sub?
di lepat (utente non iscritto) data: 04/06/2014 12:06:26
le cose semplici non ti piacciono ? tutto è possibile, provaci, a me non piace complicarmi la vita inutilmente

di scossa data: 04/06/2014 12:53:56
@lepat: non mi pare ci sia da complicarsi la vita, anzi....

scossa's web site

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
  Select Case Target.Name
    Case "Totali"
      Call Calcola2
    Case "Foglio 3"
      Call Somma
  End Select

End Sub

di Barone Rosso (utente non iscritto) data: 04/06/2014 13:01:22
Ciao lepat, era solo per approfondire e capire qualcosa in più sul Vba, comunque ho risolto il problema creando una casella di testo nella cella, così facendo non si vedono i pulsanti, ed in più quando posiziono il mouse sopra cambia icona con la manina che indica che si puo cliccare sopra.
di Barone Rosso (utente non iscritto) data: 04/06/2014 17:41:57
Grazie a tutti per l'aiuto siete fantastici
Ho aquisito qualcosa di utile!

Vuoi Approfondire?