Supprimer les cellules vides

[guy72]

Bonjour,
Comment supprimer les cellules vides éparpillées (sans les celectionner une par une) dans une ligne ?
Merci de votre aide.
Guy

 

[Modeste]

Re : Supprimer les cellules vides

Bonjour gy72, le forum,

...Si j'ai bien compris: sélectionner la ligne, appuyer sur la touche F5, puis le bouton "Cellules..." en bas à gauche, ensuite, cocher "Cellules vides" > OK
Maintenant que les cellules vides sont sélectionnées, clic droit sur l'une d'entre elles > Supprimer > Décaler vers la gauche

 

[gilbert_RGI]

Re : Supprimer les cellules vides

bonjour

comme ceci


Sélectionner la plage
Touche clavier F5 / Cellules / Cellules vides / OK
version 2003
Menu Edition / Supprimer / Accepter la proposition 'Décaler les cellules vers le haut' / OK
version 2007
accueil/ cellules/ flèche supprimer

choisir supprimer les cellules
dans la boite de dialogue choisir 'Décaler les cellules vers le haut' / OK

 

[Pierrot93]

Re : Supprimer les cellules vides

Bonjour à tous,

une solution vba, agit sur la ligne 3 de la feuille active :

On Error Resume Next
Rows(3).SpecialCells(xlCellTypeBlanks).Delete
On Error GoTo 0

bon après midi
@+

 

[guy72]

Re : Supprimer les cellules vides

Bonjour à tous,

une solution vba, agit sur la ligne 3 de la feuille active :

On Error Resume Next
Rows(3).SpecialCells(xlCellTypeBlanks).Delete
On Error GoTo 0

bon après midi
@+

Bonjour,
Comment j'installe ce code, en macro ?

 

[Pierrot93]

Re : Supprimer les cellules vides

Re,

dans l'éditeur vba, dans un module standard, tu peux également .affecter ce code à un bouton...

 

[guy72]

Re : Supprimer les cellules vides

J'ai mis ça à un bouton

Sub Supprimer_vide()
On Error Resume Next
Rows(55).SpecialCells(xlCellTypeBlanks).Delete
On Error GoTo 0
End Sub

Mais rien ne se passe

 

[gilbert_RGI]

Re : Supprimer les cellules vides

bonsoir

essayer ceci 🙄

Sub supp()
    On Error Resume Next
    Sheets(1).Select
    Range("D100").Select
    Selection.SpecialCells(xlCellTypeBlanks).Select
    Selection.Delete Shift:=xlUp
    On Error GoTo 0
End Sub

 

[guy72]

Re : Supprimer les cellules vides

bonsoir,
Je comprends pas.
J'ai toute une ligne avec plein de cellules vides et des mots dans les autres.
Que je dois ramener au début.
Je souhaite faire la solution : Touche clavier F5 / Cellules / Cellules vides / OK
Mais effectivement avec une macro, cela plus rapide, car j'ai de 3 à 1172 lignes à faire une par une.

 

[Modeste]

Re : Supprimer les cellules vides

Bonsoir,

Pour autant que je puisse en juger, ma proposition de 16h20 devrait fonctionner ... Il en va de même pour le code proposé par Pierrot !!
Si ton fichier comporte l'une ou l'autre particularité, déposes-en une version sans données confidentielles.

A priori, rien n'interdirait d'appliquer l'une ou l'autre méthode à 1000 lignes!?

 

[guy72]

Re : Supprimer les cellules vides

Ok ça marche comme ça

D'accord, suis-je bête, je n'ai pas essayé sur plusieurs lignes.
Je pensais que je pouvais faire ça que ligne par ligne.
Merci de votrre aide
Guy