aller sur la cellule vide suivante

[crinquinette]

bonjour,
j'ai une série de données et je voudrais pour mettre la série suivante aller sur la première cellule vide disponible.
exemple : ma série va jusque a58 je voudrais sélectionne sans donner d'adresse la cellule vide suivante soit la a59
merci de votre aide

 

[WILFRIED]

Salut crinquinette,

en vba voici une fonction qui te permet cela :

si tu pars de ta cellule active vers le bas :

activecell.end(xldown).select : selectionne la derniere cellule non vide

activecell.offset(1,0).select : décale d'une ligne

attention si dans ton tableau tu as une cellule vide au milieu de cellule pleine et que tu veu connaitre la derniere cellule vide de tous ton tableau utilise plustôt : range('A65536').end(xlup)

cela fonctionne aussi pour les lignes (xlleft) et xlright.

a+ will ;op

 

[PascalXLD]

Bonjour

Petite précision si tu permets Wilfried pour les lignes il faut xltoleft et xltoright ...... va comprendre

Bonne journée

 

[crinquinette]

re bonjour,
si j'utilise la fonction
range('a65536').end(xlup) j'ai un message d'erreur, savez-vous pourquoi?
merci

 

[PascalXLD]

Re

Quel message d'erreur ??

 

[WILFRIED]

Salut pascal,

Décidément, ma mémoire n'est vraiment pas bonne en ce moment...

Heureusement la tienne fonctionne toujours.

Peut-être devrait-je suivre l'exemple de robert et me faire une greffe LOL

A+

 

[crinquinette]

re bonjour,
erreur de compilation, utilisation incorrecte de la propriété

 

[PascalXLD]

Alors petite précision

il faut un truc du genre

dim toto as string
dim maligne as integer

toto=inputbox 'question'
maligne = range('A65536).end(xlup).row + 1
Range('A' & maligne)=toto

 

[crinquinette]

bonjour,
je ne veux pas afficher de boite message, ce que je veux c'est simplement me positionner sur la première cellule vide de ma colonne, pour y coller des données
merci

 

[PascalXLD]

Dans ce cas là

Sub toto()

Range('A65536').End(xlUp).Offset(1, 0).Select

End Sub

 

[crinquinette]

re re bonjour,
merci mille fois ça marche
bonne journée