XL 2019 cellule vide

[MOmichel]

bonjour
j'aimerai avoir une explication j'ai un tableau avec X lignes ci dessous
lorsque je veux sélectionner la premiere ligne non vide da la colonne E en appliquantt le code

Range("e20000").Select
' Boucle tant que pas vide
Do While (IsEmpty(ActiveCell))
NbLigne = NbLigne - 1
Selection.Offset(-1, 0).Select
Loop
Selection.Offset(1, 0).Select
Range(ActiveCell, ActiveCell.End(xlDown)).Select
Selection.ClearContents
Range("e20000").Select
Selection.End(xlUp).Select

je viens me positionner sur la cellule E,91 et non sur la E79 ?

par avance merci pour vos commentaires

 

[Staple1600]

Bonjour le fil

En creusant ce que j'écrivais dans le post#8, et sur la base des réponses de vgendron et chris (en début de fil)
Une possibilité (sans boucle)

Sub Première_Cellule_Vide_dans_Colonne_LO()
Dim LObj As ListObject, pVide As Range
Set LObj = ActiveSheet.ListObjects(1)
'ici test dans la colonne 5 du tableau
Set pVide = LObj.Range(1, 5).End(xlDown).Offset(1)
MsgBox pVide.Address, vbInformation, "Test"
End Sub

Test OK sur Excel 2013
(avec un seul ListObject sur la feuille active)

 

[chris]

Bonjour

NON, comme je l'ai dit au #5 ne marche que dans certains cas
Si toute le colonne E est vide ou bien si E2 est vide et d'autres cellules remplies cela ne donne pas la 1ère cellule vide à partir du haut

Dans un tableau structuré, les xlDown et le Xlup ne fonctionnent pas comme dans une plage

 

[Staple1600]

Bonjour chris

Cela a fonctionné lors de mon test pourtant.
C'est pour cela que j'ai posté le message#16
Voici le test en question

 

[chris]

RE

Dans ton test quelles cellules sont remplies en colonne E ?

 

[Staple1600]

Re

Voir la copie d'écran de mon message précédent.

EDITION: Je viens de faire un second test
J'ai effacé le contenu de E8
La MsgBox affiche alors E8
Puis j'ai ressaisi une valeur en E18 et effacé E11
La MsgBox affiche alors E11

 

[chris]

RE

Oui s'il n'y a pas de trous, cela fonctionne mais vide E2 et teste : là moi j'obtiens E4

Edit : donc si E2 vide ou rien dans la colonne cela ne marche pas donc pas fiable

 

[Staple1600]

Re

=>chris
J'ai jamais dit que c'était fiable
(mais que mon test (tel que je l'ai fait) était OK)
Mais normalement, dans un ListObjet bien né, il n'y a pas de cellules vides
Encore moins des colonnes plus ou moins vides.

 

[chris]

RE

Un tableau structuré ne doit pas avoir de ligne ou colonne entièrement vide mais heureusement des cellules peuvent être vides ...

En revanche c'est le propos initial qui n'a pas vraiment de sens : si on veut compléter un tableau, on cherche la ligne à compléter avec des identifiants, pas un trou...

 

[Staple1600]

Re

chris

Spoiler: Comme dirait Leroy J. GIBBS -> règle N°5

Jadis je suis tombé là dessus
Je l'ai imprimé et accroché sur mon frigidaire

EXCEL GOLDEN RULES
2. Worksheet For ALL Related RAW Data.
3. Classic Table Format For Related Data. That is, Row 1 For Headings and Corresponding Data Underneath.
4. Don't Mix Raw Data With Final Results, Reports or Data.
5. No Blank Cells in a Table.

NB: Mais je subodore que tu les connaissais déjà
Par contre pas sûr que tu connaisses Leroy

 

[chris]

RE

C'est une erreur de sa part.

Les tableaux seraient inutilisables avec une telle règle.

Par exemple, imagine un tableau des factures avec

• une colonne date de paiement : tant que la facture n'est pas réglée c'est vide
• une colonne pointage banque : tant que pas pointé...

etc
C'est une blague leroy j. gibbs ?

 

[Patrice33740]

Bonjour le Fil
Toujours pas de nouvelle de MOmichel ...
Mais je vous rappelle que depuis son premier post il demande et répète :

lorsque je veux sélectionner la premiere ligne non vide da la colonne E en appliquantt le code
ce que je voulais demander c'est
lorsque je veux sélectionner la premiere cellule non vide de la colonne E en appliquant le code ci dessous

Ce n'est ni la premiere ligne vide, ni la ligne qui suit la dernière ligne non vide.

 

[Staple1600]

Re

=>Patrick33740
Rassures-moi, tu connais Leroy, hein?
Sinon pour la question.
Pourquoi sortir VBA ...quand son clavier regarde attention et caresses
(Personnellement toujours, je m'oblige à piloter mon Excel qu'avec des raccourcis clavier, ce qui donne un joli galbe à mes doigts)

 

[Staple1600]

Re

Ici donc, mon clavier frémira sous mes doigts avec
CTRL+FLECHE BAS
FLECHE BAS

 

[chris]

RE

Et comme déjà dit, sélectionner en VBA est 9fois /10 une mauvaise pratique

 

[Patrice33740]

Plutôt 999 fois sur 1000