Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

vba 2003: eseguire macro al cambio di foglio

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

vba 2003: eseguire macro al cambio di foglio

Postdi karug64 » 14/10/12 14:59

Vorrei far appararire un msgbox di avvertenza ogni qualvolta si selezioni un foglio.
Sapreste dirmi qual'e' l'evento in cui inserire il relativo codice ?
Grazie
Office 2010
karug64
Utente Senior
 
Post: 580
Iscritto il: 20/11/11 21:22

Sponsor
 

Re: vba 2003: eseguire macro al cambio di foglio

Postdi Flash30005 » 14/10/12 17:29

lo trovi nel foglio stesso
Codice: Seleziona tutto
Private Sub Worksheet_Activate()
'qui inserisci il codice o nome della macro che vorrai avviare (macro o messaggio, se unico per tutti i fogli, potrai inserirlo in un modulo e richiamarlo da ogni foglio)
End Sub


ciao
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: vba 2003: eseguire macro al cambio di foglio

Postdi Anthony47 » 14/10/12 19:16

Ricordo che esiste anche l' evento Workbook_SheetActivate, da gestire all' interno del modulo ThisWorkbook.
Quindi se i fogli coinvolti sono pochi allora conviene usare i singoli eventi Worksheet_Activate, se sono "tutti" allora forse converra' Workbook_SheetActivate, se sono "molti ma non tutti" allora va valutato se e' piu' semplice impostare tante macro di Worksheet_Activate oppure una singola Workbook_SheetActivate contenente il codice per escludere un tot di fogli dalle operazioni; qualcosa come
Codice: Seleziona tutto
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
NotList = Array("Foglio1", "Foglio2")   '<<< Lista dei fogli da escludere
If IsError(Application.Match(ActiveSheet.Name, NotList, 0)) Then Exit Sub
'
' le istruzioni per fare il lavoro sui fogli non in array
'
End Sub
La riga marcata <<< e' da personalizzare
Ovviamente se la lista "da escludere" fosse piu' lunga della lista "da includere" allora converrebbe invertire il significato dell' array e modificare in If Not IsError etc etc

Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13885
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: vba 2003: eseguire macro al cambio di foglio

Postdi karug64 » 14/10/12 21:00

Grazie. Risolto
Office 2010
karug64
Utente Senior
 
Post: 580
Iscritto il: 20/11/11 21:22


Torna a Applicazioni Office Windows


Topic correlati a "vba 2003: eseguire macro al cambio di foglio":


Chi c’è in linea

Visitano il forum: Nessuno e 9 ospiti