Nascondi righe se 4 celle nella riga hanno valore zero

[domenicoPartecipante domenico]

Mi piacerebbe poter nascondere tutte le righe che hanno valori uguali a zero in 4 differenti celle della stessa riga

Esempio:

0   1   2   1   0   5   2   0   1    1   0

se la prima, la quinta, l'ottava e  l'undicesima cella contengono il valore zero, allora tutta la riga dovrà essere nascosta.

Grazie mille per la vostra collaborazione

[Oscar Oscar]

Prova così se ci riesci

Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Dim Righe, Colonne As Integer
conta = 0
For Righe = 1 To 20 '< <

[domenicoPartecipante domenico]

Ciao Oscar,

grazie per la tua gentile risposta.

Leggendo la macro che hai scritto, mi sembra che la macro nasconda la riga se in una riga trova 4 valori a zero.

Sicuramente non mi sono spiegato bene, infatti dovrebbe controllare solamente certe celle, nell'esempio sarebbero le celle Actual, I Fcst, Budget, 2017, e soltanto se tutte queste celle sono a zero deve nascondere la riga.

nell'esempio la macro dovrebbe nascondere solo le righe relative a Mostre ed Eventi e Studi e Ricerche.

grazie

Allegati:

You must be logged in to view attached files.

[domenicoPartecipante domenico]

Ciao Oscar,

guarda solo il file allegato.... la tabella si è incasinata

grazie

[Autore]

Articoli