Discussion :

[gilou41]

Bonjour à vous tous
je tourne en rond sur un petit problème qui semble simple mais pour lequel je ne trouve pas la solution.
J'ai un tableau de 23 colonnes et 32 lignes dans lequel des lignes se vident sous certaines conditions. Je voudrais pouvoir remonter les lignes non vides au début de mon tableau.
Si quelqu'un peut me donner le "sésame" je lui en serais reconnaissant
Bonne journée à tous

[BenjGe]

Il suffit de tout sélectionner (CTRL+A) et de trier la page. Les lignes vides vont alors redescendre

[gilou41]

Merci Benjile pour cette réponse rapide
jy avais déjà pensé mais mon problème est que les cellules vides ont des formats de remplissage couleur qui restent.
Il faut donc le code pour sélectionner toutes ces cellules vides et éffacer le format.
Pour trouver après le tri la premiere cellule vide, je sais faire mais en revanche définir le champs de cette cellule jusqu'au bas du tableau pour pouvoir effacer le format je ne sais pas comment l'écrire
Merci d'avance

[Supermichou]

Bonjour,

soit il te faut du code VB ou refaire un tableau qui résumeras le premier.
Après ça dépend de ton niveau sur Excel et à quelle version tu souhaites avoir.

[Marc-L]

Bonjour.

P'tite démo VBA pour un tableau débutant dans la cellule A1 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Sub Demo()
    Const NL = 32
      Set Rg = [A1].Resize(NL, 23)
 
    Application.ScreenUpdating = False
 
    For R = NL To 1 Step -1
        If Application.WorksheetFunction.CountA(Rg.Rows(R)) = 0 Then Rg.Rows(R).Delete
    Next
 
    Application.ScreenUpdating = True
End Sub

[Supermichou]

Bonjour,

je ne sais pas si un .delete est la bonne solution car la demande est de remonter les lignes selon des conditions, pas de faire place nette ce qui serait ennuyeux si les conditions de départ changent. Un hidden=true serait mieux mais inadéquat.

peut être peut-on simplement agir sur la prise en compte des conditions de départ pour ne mettre que celles-ci et ainsi avoir les lignes vides en bas du tableau et avoir les données d'un seul bloc.

Un exemple serait le bienvenu.
et encore une fois, choisir entre une solution purement excel ou venir sur le chemin des macro.

Supermichou

[Alex vba]

Bonjour le forum,

Pouvez-vous ajouter une colonne à votre tableau ?
Si oui :
_ Ajoutez en dernière colonne un test pour chaque lignes.
par exemple :
=ESTVIDE(A1) renvoie vrai si A1 est vide (quel que soit la mise en forme). Ne teste que la première cellule d'une ligne.
=SI(NB.VIDE(A1:W1)>0;"Est vide ou incomplet";"Non vide")
renvoie "non vide" si toute les cellules de A1 à W1 ne sont pas vide. Renvoie "Est vide ou incomplet" au moins une cellule entre A1 et W1 est vide.
Cette opération teste la complétion de 23 cellules, en supposant que la première est en A.

_ Triez votre tableau sur la colonne de test.

C'est du bricolage mais ça fonctionne chez moi.

Alexandre.