Macro ou formule décaler plage de cells vers haut

Question

Bonjour j'ai une colonne de 1000 lignes comme ça : 

G1 : "vide"
G2: "02/2016"
G3:"02/2016"
G4:"03/2016"
'
'

je voudrai les décaler vers le haut pour avoir :

G1 :"02/2016"
G2: "02/2016"
G3:"03/2016"
G4:"03/2016"
'
'

Merci à vous !

Jauster · Answer

Sub SupprBlanc()
ActiveSheet.UsedRange.Select
Dim i As Long
    With Application
        .Calculation = xlCalculationManual
        .ScreenUpdating = False
        
            For i = Selection.Rows.Count To 1 Step -1
                If WorksheetFunction.CountA(Selection.Rows(i)) = 0 Then
                Selection.Rows(i).EntireRow.Delete
                End If
            Next i
        .Calculation = xlCalculationAutomatic
        .ScreenUpdating = True
    End With
End Sub


Bonjour,
Code a essayer. Il suffit de sélectionner les cellules sur lesquelles vous souhaitez appliquer la macro et la lancer

Macro ou formule décaler plage de cells vers haut

1 réponse

Discussions similaires

Newsletters