Moderatori: Anthony47, Flash30005
Sub Eli_Celle_Vuote()
Application.ScreenUpdating = False
For I = 1 To 2
Y = 2
Fn = 601
While Y <= Fn
If Cells(Y, I) = "" Then
Cells(Y, I).Select
Selection.Delete Shift:=xlUp
Fn = Fn - 1
Y = Y - 1
End If
Y = Y + 1
Wend
Next I
Application.ScreenUpdating = True
End Sub
Torna a Applicazioni Office Windows
Mettere tutto MAIUSCOLO un range di celle Autore: raimea |
Forum: Applicazioni Office Windows Risposte: 7 |
Trasformare celle con formattazioni in html Autore: servicedynergy |
Forum: Applicazioni Office Windows Risposte: 5 |
inserisci valore in celle a seguito di condizione Autore: ucame |
Forum: Applicazioni Office Windows Risposte: 10 |
cancella righe completamente vuote Autore: trittico69 |
Forum: Applicazioni Office Windows Risposte: 3 |
Visitano il forum: Nessuno e 16 ospiti