Visualizza messaggio singolo
Vecchio 17-11-2007, 01.05.56   #4
Cricchia
Miss Nuuuuuu
 
L'avatar di Cricchia
 
Registrato: 23-07-2003
Loc.: più o meno.. Milano
Messaggi: 908
Cricchia promette bene
hai ragione... provando non me ne ero accorta.. così dovrebbe funzionare (ci giriamo intorno eh! )

Codice:
Sub elimina()
ic = 1
ir = 1
For x = 1 To 100
    If Cells(ir, ic) = Empty Then
        Cells(ir, ic).EntireRow.Delete
        ir = ir - 1
    End If
ir = ir + 1
x = x + 1
Next
End Sub
___________________________________

« Le persone che non amano i gatti probabilmente erano topi in una vita precedente!! »
~ Non è possibile avere un cuore per gli uomini ed un cuore per gli animali. O si ha un cuore, o non lo si ha proprio. ~
Cricchia non è collegato   Rispondi citando