| | Post: 18 | Registrato il: 06/11/2020
| Età: 69 | Utente Junior | Office Professional Plus 2016 | | OFFLINE | |
|
14/11/2020 10:28 | |
Buongiorno, ho una domanda: ho creato un foglio Excel, ho
creato un pulsante con una macro per colorare le celle nelle colonne H, J, L,
N, e P, poi una tabella a cascata, e una formula per colorare le domeniche e
feste, dopo che ho inserito “la formula per colorare le domeniche e feste” il
Pulsante1 per colorare le celle nelle colonne H, J, L, N, e P, non funziona
più. Non riesco a individuare l’errore.
Ringrazio chi mi può aiutare. Giovanni
https://onedrive.live.com/edit.aspx?cid=c69565f473787a90&page=view&resid=C69565F473787A90!462&parId=C69565F473787A90!107&app=Excel
|
|
| | Post: 6.136 | Registrato il: 14/11/2004
| Utente Master | Office 2019 | | OFFLINE |
|
14/11/2020 11:15 | |
Ciao il link non funziona, perche non lo alleghi scegliendo Allega e scegli il file sul PC.
Ciao By Sal (8-D
se ti piace la soluzione sostienici con una DONAZIONE a piacere. Grazie clicca qui |
| | Post: 18 | Registrato il: 06/11/2020
| Età: 69 | Utente Junior | Office Professional Plus 2016 | | OFFLINE | |
|
14/11/2020 11:32 | |
Il pulsante macro non funziona più Ho riprovato lo ho allegato. |
| | Post: 1.997 | Registrato il: 10/10/2013
| Città: VICENZA | Età: 69 | Utente Veteran | 365 | | OFFLINE |
|
14/11/2020 12:56 | |
ciao
perchè
nella colonna F
non hai "Venerdì"
o altro giorno della settimana come testo ma
una data |
| | Post: 1.998 | Registrato il: 10/10/2013
| Città: VICENZA | Età: 69 | Utente Veteran | 365 | | OFFLINE |
|
14/11/2020 12:56 | |
ciao
allora cambia
la macro così
Sub colora()
Dim rng As Range
Dim cel As Range
Range("H7:P37").Interior.ColorIndex = xlNone
Set rng = Range("H7:P37")
For Each cel In rng
Select Case cel.Column
Case Is = 8
If Cells(cel.Row, 7).Value = "martedì" Then
cel.Interior.ColorIndex = 6
End If
Case Is = 10
If Cells(cel.Row, 7).Value = "venerdì" Then
cel.Interior.ColorIndex = 43
End If
Case Is = 12
If Cells(cel.Row, 7).Value = "mercoledì" Then
cel.Interior.ColorIndex = 46
End If
Case Is = 14
If Cells(cel.Row, 7).Value = "mercoledì" Or Cells(cel.Row, 7).Value = "sabato" Then
cel.Interior.ColorIndex = 33
End If
Case Is = 16
If Cells(cel.Row, 7).Value = "lunedì" Or Cells(cel.Row, 7).Value = "giovedì" Then
cel.Interior.ColorIndex = 44
End If
End Select
Next cel
End Sub
nb
ho aggiunto
Range("H7:P37").Interior.ColorIndex = xlNone
altrimenti i colori si sovrappongono se cambi il mese
in colonna g
cella G7
=TESTO(F7;"gggg")
e tirala in giù
in formattazione condizionale per la domenica
cambia la colonna da G a F
=GIORNO.SETTIMANA($F7;2)=7
[Modificato da federico460 14/11/2020 13:08] |
| | Post: 19 | Registrato il: 06/11/2020
| Età: 69 | Utente Junior | Office Professional Plus 2016 | | OFFLINE | |
|
14/11/2020 13:07 | |
Il pulsante macro non funziona più Se tu guardi il mese di dicembre, dove per provare non ho inserito la "“la formula per colorare le domeniche e feste” il
Pulsante1 per colorare le celle nelle colonne H, J, L, N, e P," se provi il pulsante funziona, cancelli i colori e poi clicchi il pulsante. |
| | Post: 4.497 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Master | Excel 365 | | OFFLINE |
|
14/11/2020 13:08 | |
Questa macro la conosco.
Scusa ma come vuoi che la macro funzioni se hai cambiato i dati nella colonna G rispetto al file precedente?
Prima vi erano delle stringhe ed ora formule.
Una macro non può smettere di funzionare improvvisamente senza che si sia fatto nulla.
O funziona sempre o non funziona mai.
Alfredo |
| | Post: 1.999 | Registrato il: 10/10/2013
| Città: VICENZA | Età: 69 | Utente Veteran | 365 | | OFFLINE |
|
14/11/2020 13:11 | |
ciao
Al
ti ho fregato sul tempo😜
|
| | Post: 20 | Registrato il: 06/11/2020
| Età: 69 | Utente Junior | Office Professional Plus 2016 | | OFFLINE | |
|
14/11/2020 13:24 | |
Il pulsante macro non funziona più OK, tutto bene tranne la colonna G che i giorni rimangono tutti azzurri HO meso cosi =O(GIORNO.SETTIMANA($F7;2)>5;CONTA.SE($Y$6:$Y$19;$F7)=1) |
| | Post: 2.000 | Registrato il: 10/10/2013
| Città: VICENZA | Età: 69 | Utente Veteran | 365 | | OFFLINE |
|
14/11/2020 13:26 | |
scusa azzurra la colonna G
perchè
mica si colora di azzurro
nb
ora non devi cancellare i colori a mano
lo fa la macro [Modificato da federico460 14/11/2020 13:27] |
| | Post: 21 | Registrato il: 06/11/2020
| Età: 69 | Utente Junior | Office Professional Plus 2016 | | OFFLINE | |
|
14/11/2020 13:28 | |
Il pulsante macro non funziona più metto la foto
|
| | Post: 2.001 | Registrato il: 10/10/2013
| Città: VICENZA | Età: 69 | Utente Veteran | 365 | | OFFLINE |
|
14/11/2020 13:31 | |
😂
è perchè hai copiato la formula
e ha preso il colore che ho impostato io.
basta cambiare formattazione |
| | Post: 22 | Registrato il: 06/11/2020
| Età: 69 | Utente Junior | Office Professional Plus 2016 | | OFFLINE | |
|
14/11/2020 13:34 | |
Il pulsante macro non funziona più Se puoi poi non disturbo più (sto imparando e tante cose ora le so fare) Come la cambio la formattazione |
| | Post: 23 | Registrato il: 06/11/2020
| Età: 69 | Utente Junior | Office Professional Plus 2016 | | OFFLINE | |
|
14/11/2020 14:00 | |
Il pulsante macro non funziona più Ce lo fatta, scusate tutti con le formule e le macro sono alle prime armi, tutto risolto, ringrazio tutti per la pazienza e la cortesia, grazie ancora. Giovanni |
|
|