Riempimento cella tramite Pulsante (macro)

Question

Salve a tutti 

premetto che so usare excel solo a livello estremamente basilare

ma avrei l'esigenza di creare una cosa all'apparenza molto semplice 

se qualcuno potesse aiutarmi gliene sarai immensamente grato

Dovrei creare un pulsante o una macro che mi consenta di riempire di un colore X la cella che seleziono 

faccio un esempio basilare tanto per farvi capire

ho una lista di nomi 

e selezionando la casella con il valore "mario" e poi su un pulsante con scritto "maschio" mi colori suddetta casella di azzurro

oppure il pulsante "femmina" mi colori la cella di Rosa

in pratica esattamente come se cliccassi sull'icona di riempimento cella, ma tramite un pulsante, e senza passare dal passaggio di selezione del colore

Grazie

Answer 1

Ciao ValeSa1,

Benvenuto nella Community!

premetto che so usare excel solo a livello estremamente basilare

ma avrei l'esigenza di creare una cosa all'apparenza molto semplice 

se qualcuno potesse aiutarmi gliene sarai immensamente grato

Dovrei creare un pulsante o una macro che mi consenta di riempire di un colore X la cella che seleziono 

faccio un esempio basilare tanto per farvi capire

ho una lista di nomi 

e selezionando la casella con il valore "mario" e poi su un pulsante con scritto "maschio" mi colori suddetta casella di azzurro

oppure il pulsante "femmina" mi colori la cella di Rosa

in pratica esattamente come se cliccassi sull'icona di riempimento cella, ma tramite un pulsante, e senza passare dal passaggio di selezione del colore

Nonostante il consiglio di Flavio_t di cercare aiuto altrove, penso che troverai esperto aiuto anche da noi qui.

Se non hai mai abilitato la scheda Sviluppo, che è nascosta per impostazione predefinita, occorre prima di tutto abilitarla:

• File
• Opzioni
• Personalizzazione barra multifunzione
• Schede principali
• Seleziona la casella di controllo Sviluppo
• OK

   

Avendo abilitato la scheda Sviluppo:

Nel gruppo Controlli della scheda Sviluppo fai clic su Inserisci

In Controlli modulo fai clic su Pulsante  

• Alt+F11 per aprire l'editor di VBA
• Alt+IM per inserire un nuovo modulo di codice
• Nel nuovo modulo vuoto, incolla il seguente codice:

'=========>>

Option Explicit

'--------->>

Public Sub Maschio()

    ActiveCell.Interior.Color = RGB(219, 228, 241)

End Sub

'--------->>

Public Sub Femmina()

    ActiveCell.Interior.Color = RGB(242, 221, 220)

End Sub

'<<=========

• Alt+Q per chiudere l'editor di VBA e tornare a Excel
• Seleziona la posizione sul foglio in cui vuoi inserire il primo pulsante
• Nel gruppo Controllidella scheda Sviluppo fai clic su Inserisci
• In Controlli modulo fai doppio clic su Pulsante
• Seleziona Maschio
• OK

• Sostituisci il nome del pulsante con Maschio
• Seleziona la posizione sul foglio in cui vuoi inserire il secondo pulsante
• Nel gruppo Controllidella scheda Sviluppo fai clic su Inserisci
• In Controlli modulo fai doppio clic su Pulsante
• Seleziona Femmina
• OK
• Sostituisci il nome del secondo pulsante con Femmina

   

• Salva il file con l’estensione xlsm

Potresti scaricare il mio file di prova ValeSal20171013.xlsm

===

Regards,

Norman

Answer 2

Ciao Vale,

ti consiglio di dare una lettura  a questo articolo  e vedere se fa al caso tuo.

Per maggiori informzioni e aiuto puoi  anche scrivere a questo indirizzo  in quanto hanno maggiori possibilita' di aiutarti con le Macro.

Aggiornaci sulla situazione

Flavio