Condividi:        

Tornare al foglio precedente attivo

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Tornare al foglio precedente attivo

Postdi erryrox » 08/05/12 18:41

Ecco il mio nuovo problemino, spero che come sempre riusciate a darmi una dritta!

Avrei bisogno di una macro attivabile tramite pulsante che mi permetta di tornare al foglio attivo precedente a quello in cui mi trovo adesso.
Esempio: cartella di lavoro con 3 fogli. Sono sul foglio 1, poi apro il foglio 3. Sul foglio 3 mi servirebbe un tasto per tornare al foglio 1.

Ho cercato in giro, ma trovo solo macro per tornare al foglio che si trova precedente nell'"elenco delle linguette".

Avete qualche idea??? grazie
erryrox
Utente Junior
 
Post: 60
Iscritto il: 16/04/12 14:31

Sponsor
 

Re: Tornare al foglio precedente attivo

Postdi Flash30005 » 08/05/12 19:03

In ogni foglio (vba) inserisci
Codice: Seleziona tutto
Private Sub Worksheet_Deactivate()
NFile = Name
End Sub


In un modulo inserisci questo codice
Codice: Seleziona tutto
Public NFile As String
Sub Richiama()
Worksheets(NFile).Select
End Sub


Inserisci un comando (figura, forma o pulsante) che richiami la macro "Richiama"
copi il comando su tutti i fogli di lavoro

ciao
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: Tornare al foglio precedente attivo

Postdi erryrox » 08/05/12 19:12

Perfetto!!!! grazie mille

esiste anche il comando per andare avanti?
erryrox
Utente Junior
 
Post: 60
Iscritto il: 16/04/12 14:31

Re: Tornare al foglio precedente attivo

Postdi scossa » 08/05/12 19:14

erryrox ha scritto:Ecco il mio nuovo problemino, spero che come sempre riusciate a darmi una dritta!

Avrei bisogno di una macro attivabile tramite pulsante che mi permetta di tornare al foglio attivo precedente a quello in cui mi trovo adesso.
Esempio: cartella di lavoro con 3 fogli. Sono sul foglio 1, poi apro il foglio 3. Sul foglio 3 mi servirebbe un tasto per tornare al foglio 1.

Ho cercato in giro, ma trovo solo macro per tornare al foglio che si trova precedente nell'"elenco delle linguette".

Avete qualche idea??? grazie


La più semplice mi sembra questa:
Inserisci un nome (menù inserisci -> Nome -> Definisci) che chiamerai precedente
in Riferito a: metti =""
e clicca Aggiungi

Ora nel modulo di classe di ThisWorkbook (evento Workbook_SheetDeactivate) metti questo codice:
Codice: Seleziona tutto
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
  Me.Names("precedente").RefersTo = Sh.Name
End Sub


in un modulo standard metti invece questo macro che abbinerai ad una cominazione di tasti o ad un pulsante (ma allora devi mettere un pulsante in ogni foglio):
Codice: Seleziona tutto
Public Sub ShPre()
  ThisWorkbook.Worksheets([precedente]).Activate
End Sub



Edit: ciao Flash, ho visto solo ora che avevi suggerito una soluzione simile.
Bye!
scossa

Se tu hai una mela, e 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)
Avatar utente
scossa
Utente Senior
 
Post: 427
Iscritto il: 01/04/12 16:40
Località: Provincia di Verona


Torna a Applicazioni Office Windows


Topic correlati a "Tornare al foglio precedente attivo":


Chi c’è in linea

Visitano il forum: Nessuno e 107 ospiti