Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Tendina che ingrigisce via MACRO.

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

Tendina che ingrigisce via MACRO.

Postdi e.giulio » 04/02/08 14:57

Ciao, qualche anima pia, che magari ha più esperienza di me in Excel, sa come:
- da un menù a tendina si può scegliere 0 oppure 1
- se si sceglie 0, si ingrigiscono 4 o 5 celle successive a quella con la tendina
- se si sceglie 1, tornano normali.

Per ora, sono riuscito a creare una macro che, abbinata ad un tasto, ingrigisce delle celle (purtroppo, sempre quelle):

Sub Macro1()
'
Worksheets("Foglio1").Range("B1:C1:D1:E1:F1").Interior.ColorIndex = 3
'
End Sub

Io vorrei poter abbinare un qualcosa del genere al menù a tendina che, però, agisca in modo "intelligente", ingrigendo un certo numero di celle di fianco alla propria tendina e non in modo assoluto come ora. Grazie fin d'ora, Giulio.
e.giulio
Utente Junior
 
Post: 19
Iscritto il: 19/02/07 15:15

Sponsor
 

Re: Tendina che ingrigisce via MACRO.

Postdi Anthony47 » 04/02/08 15:51

Devi usare qualcosa come
Codice: Seleziona tutto
Activecell.Range("A1:D1").Interior.ColorIndex = 3
(questa ingrigisce 4 celle a partire da quella selezionata.
Oppure
Codice: Seleziona tutto
Activecell.offset(0,1).Range("A1:D1").Interior.ColorIndex = 3

che lavora su 4 celle dopo quella selezionata.

Eventualmente associ il codice a una macro di tipo Worksheet_Change, per far partire l macro quando cambia una cella del tuo foglio.
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


Torna a Applicazioni Office Windows


Topic correlati a "Tendina che ingrigisce via MACRO.":


Chi c’è in linea

Visitano il forum: Nessuno e 11 ospiti