Eliminer les cellules vides par colonne

[christelle2014d]

Bonsoir,

J'ai un gros souci avec mon tableau. Celui-ci contient de nombreuses colonnes auxquelles y sont mises des cellules vides.
J'arrive à les éliminer grâce au "trie" mais je dois les sélectionner une à une et c'est long et fastidieux 😡

Y-a-t-il une solution plus simple ou automatique pour éliminer les cellules vides et regrouper les chiffres d'une même colonne (sachant que chaque ne dépende pas d'une autre, donc toute individuellement).

Je vous joints le lien du classeur :

Ce lien n'existe plus

Merci d'avance pour votre aide 😛

 

[CISCO]

Re : Eliminer les cellules vides par colonne

Bonjour

Ne pourrais-tu mettre un extrait de ton fichier directement sur le forum ?

@ plus

 

[christelle2014d]

Re : Eliminer les cellules vides par colonne

Excusez-moi, je vais essayer ....

 

[CISCO]

Re : Eliminer les cellules vides par colonne

Bonsoir

Le mieux serait de faire ça avec une macro, mais je ne sais pas. Ci-joint donc, une possibilité avec une formule matricielle utilisant les 10000 lignes de la première feuille et allant jusque la colonne CU. Après, il te faut encore supprimer les colonnes vides puis faire un copier-collage des valeurs sur une autre feuille. Pas hyperpratique...

@ plus

 

[klin89]

Re : Eliminer les cellules vides par colonne

Bonjour Christelle, Cisco 🙂

Selection.SpecialCells(4).Delete xlShiftUp

Attention aux espaces invisibles.
klin89

 

[christelle2014d]

Re : Eliminer les cellules vides par colonne

Bonsoir,

Merci Cisco pour avoir usé de ton temps. Je vais essayer ta méthode demain matin et te mets au courant. 😉
Merci aussi Klin89 mais le "code" est à mettre ou ? (dans la matrice ? A quoi sert-il ?)

Merci encore à vous deux !!!

 

[CISCO]

Re : Eliminer les cellules vides par colonne

Bonsoir

La proposition de Klin89 est la ligne principale de la macro à écrire. Mais ce n'est pas la seule...

Avec des formules, on doit aussi pouvoir supprimer les colonnes vides, mais cela serait tellement mieux avec une macro...

@ plus

 

[christelle2014d]

Re : Eliminer les cellules vides par colonne

Bonjour,

En tout cas, merci à tous de votre aide (très utile). Cela fonctionne à merveille. 🙂

Bonne journée et encore un grand merci !!!!!

 

[christelle2014d]

Re : Eliminer les cellules vides par colonne

Problème résolu...

 

[Tibo62]

Re : Eliminer les cellules vides par colonne

Bonjour, pour information si j'ai bien compris (j'ai juste lu le titre du topic), ici il le fait de la ligne 1 à la ligne 50 sur la colonne A c'est bien entendu modifiable :

Const ligdeb = 1
Const ligfin = 50
Const col = "A"

Public Sub SuppLignes()
Dim li As Long
With ActiveSheet
For li = ligfin To ligdeb Step -1
If .Range(col & li).Value = "" Then Rows(li).EntireRow.Delete
Next li
End With
End Sub