supprimer vide et decaler cellule vers la gauche

[CB60]

Bonjour
Moi et les boucles c'est vraiment pas bon!!!!
J'aurais besoin de supprimer les cellules vides d'une grosse base et de déplacer les cellules vers la gauche.
Si quelqu'un a une idée.

 

[matthieu33]

Re : supprimer vide et decaler cellule vers la gauche

Bonjour Bruno,

Voici une solution avec un code VBA.

 

[skoobi]

Re : supprimer vide et decaler cellule vers la gauche

Bonjour CB60,
ce serait bien que tu mettes sur une autre feuille le résultat souhaité pour 1 semaine par exemple car apparement le décalage peut être d'une ou plusieurs cellules non?

 

[CB60]

Re : supprimer vide et decaler cellule vers la gauche

Bonjour
Et merci de vous être penché sur mon probléme.
Je viens de retrouver l'astuce pour ce genre de soucis ( je fais cela qu'une fois par an et mes neuronnes si j'ai ai commence à faiblir.
Selectionner les colonnes à traiter,
Click sur F5
Click sur cellule
Cellules vides
Click droit sur une des cellules vides et supprimer en decalant vers la gauche.
Mathieu je regarde si ta macro vas plus vite
Merci encore

Sub Macro2()
'
' Macro2 Macro
' Macro enregistrée le 10/12/2007 par Bruno
'
'
    Columns("A:AB").SpecialCells(xlCellTypeBlanks).Select
    Selection.Delete Shift:=xlToLeft
    Range("a1").Select
End Sub