Recherche derniere cellule vide

Macpoy

XLDnaute Impliqué

• 28 Mai 2010

• #2

Re : Recherche derniere cellule vide

bonsoir le forum, olivierk1450,

peut être qu'en passant par ce genre de code :

Code:

If Range("e65536").End(xlUp).Value <> 0 Then [e65536].End(xlUp).Select

à tester

@plus

 

Vote positif 0 Vote négatif

camarchepas

XLDnaute Barbatruc

• 28 Mai 2010

• #3

Re : Recherche derniere cellule vide

Bonsoir Olivier,

Un ptit fichier exemple car j'ai fais un test vite fais , moi ça marche , mais bon , y'a surement un truc particulier sur ta feuille

 

Vote positif 0 Vote négatif

O

olivierk1450

Guest

• 29 Mai 2010

• #4

Re : Recherche derniere cellule vide

Merci pour vos réponses, je vous joins un p'tit fichier pour être plus clair.
A suivre.
Bonne journée.
Olivier

 

Pièces jointes

• Classeur1.xls

  33.5 KB · Affichages: 84
• Classeur1.xls

  33.5 KB · Affichages: 85
• Classeur1.xls

  33.5 KB · Affichages: 84

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 29 Mai 2010

• #5

Re : Recherche derniere cellule vide

Bonjour,
Applique un filtre sur les cellules non vide de la colonne A puis utilise ton code
Reviens si tu ne t'en sort pas
A+
kjin

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 29 Mai 2010

• #6

Re : Recherche derniere cellule vide

Bonjour Kjin Olivier Camarche macpoy
voilà ton fichier en retour regardes si c'est ce que tu veux
a+
papou 🙂

 

Pièces jointes

• OlivierK1450.zip

  12.8 KB · Affichages: 66

Dernière édition: 29 Mai 2010

Vote positif 0 Vote négatif

O

olivierk1450

Guest

• 29 Mai 2010

• #7

Re : Recherche derniere cellule vide

Re,
Merci pour vos réponses.
Paritec, en faite la couleur n'a aucune importance pour ce que je veux faire. C'etait juste visuel...
Je cherche à selectionner dans une colonne uniquement les cellules qui contiennent une valeur, "un résultat" (en bleu dans le fichier pour mieux visualiser soit A1:A13). Les formules que j'ai trouvé selectionnent toutes les cellules (contenant une valeur et une formule) soit A1:A21
Voilà voilà.
J'espère que j'ai été plus précis.
Merci

 

Vote positif 0 Vote négatif

camarchepas

XLDnaute Barbatruc

• 29 Mai 2010

• #8

Re : Recherche derniere cellule vide

RE moi,

Bigre ,

y'a peut être plus simple,
en attendant le résultat est là
enfin , je crois , mais le client est roi , j'attents donc ta confirmation ? lol

 

Pièces jointes

• Selection.zip

  14.2 KB · Affichages: 59
• Selection.zip

  14.2 KB · Affichages: 53
• Selection.zip

  14.2 KB · Affichages: 59

Vote positif 0 Vote négatif

O

olivierk1450

Guest

• 29 Mai 2010

• #9

Re : Recherche derniere cellule vide

Camarchebien
C'est du lourd mais ca fonctionne très bien .. et c'est l'essentiel pour le moment.
Merci camarchepas
et merci à tous les membres actifs du forum.
Bye🙂

 

Vote positif 0 Vote négatif

Y

young 25

Guest

• 29 Mai 2010

• #10

Re : Recherche derniere cellule vide

=INDEX($D20:$I20;NBVAL($D20:$I20))

un façon de faire sans macro

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 29 Mai 2010

• #11

Re : Recherche derniere cellule vide

Bonjour à Tous,
Excuse moi Olivier, je n'ai fait que respecter ce que tu demandais dans ton exemple, et d'ailleurs cela marchait ou pas?
bonne journée
a+
Papou 🙂

PS: Une mauvaise demande, donne, une mauvaise réponse !!!

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 29 Mai 2010

• #12

Re : Recherche derniere cellule vide

Re Bonjour à tous,
alors Olivier la même chose mais sans les couleurs
a+
papou 🙂

 

Pièces jointes

• OlivierK1450 V2.zip

  12.8 KB · Affichages: 57

Dernière édition: 29 Mai 2010

Vote positif 0 Vote négatif

O

olivierk1450

Guest

• 29 Mai 2010

• #13

Re : Recherche derniere cellule vide

Re,

Je déclare Paritec vainqueur toutes catégories pour mon problème.
Effectivement ta première version avec les couleurs fonctionne (j'avais mal formulé ma demande), et ta dernière proposition répond exactement et simplement à mon problème.
😀
a+ pour une autre solution
Olivier.
😉

 

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 29 Mai 2010

• #14

Re : Recherche derniere cellule vide

Re, salut Papou 🙂,

Code:

    For i = Cells(65536, 1).End(xlUp).Row To 1 Step -1
        If Evaluate(Cells(i, 1).Address) <> "" Then
        MsgBox "ligne " & i
        Exit For
        End If
    Next i

A+
kjin

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 29 Mai 2010

• #15

Re : Recherche derniere cellule vide

Bonjour Kjin Olivier
Content que la solution corresponde à tes besoins.
Bonjour Kjin, je ne connaissait pas Evaluate, alors je vais noter merci pour toutes tes astuces.
Je t'avais fait un petit mail sur le remplissage des listviews l'as tu reçu?
a+
Bonne journée
Papou 🙂

 

Dernière édition: 29 Mai 2010

Vote positif 0 Vote négatif