Questione : eccellere - se la cellula è in bianco, intera colonna di cancellazione

Ciao, il
I fa eccellere un foglio elettronico dentro.

If della cellula nelle file 2 = 0 che voglio cancellare quel intero columnn.

Is questo possibile?
Sm17ch class= del

Risposta : eccellere - se la cellula è in bianco, intera colonna di cancellazione

hth

Dave

1: 2: 3: 4: 5: 6: 7: 8: 9: 10:

KillTwo secondario () Rng1 fioco come gamma lngRow fioco come lungamente Application.ScreenUpdating = falso Regolar rng1 = intersecano (ActiveSheet.UsedRange, file (2)) Per lngRow = rng1.Columns.Count a 1 punto -1 Se rng1.Cells (lngRow). Valore = “0„ allora rng1.Cells (lngRow) .EntireColumn.Delete lngRow seguente Application.ScreenUpdating = allineano Sommergibile dell'estremità