Boucle VISUAL BASIC EXCEL
Résolu
jomage
-
jomage -
jomage -
Bonjour,
Bonsoir
J’ai besoin d’aide pour une boucle VISUAL BASIC EXCEL
Dans ma macro j’utilise, pour faire remonter le curseur la boucle suivante
Do while ActiveCell.Offset(-1, 0) <> “”
ActiveCell.Offset(-1, 0).Select
Loop
Mais, malgré toutes mes tentative, cette boucle ne marche plus quand le curseur arrive en haut de la fenêtre.
Comment faire pour que la macro s’arrête normalement quand le curseur arrive en haut de la fenêtre ?
Merci d’avance
Bonsoir
J’ai besoin d’aide pour une boucle VISUAL BASIC EXCEL
Dans ma macro j’utilise, pour faire remonter le curseur la boucle suivante
Do while ActiveCell.Offset(-1, 0) <> “”
ActiveCell.Offset(-1, 0).Select
Loop
Mais, malgré toutes mes tentative, cette boucle ne marche plus quand le curseur arrive en haut de la fenêtre.
Comment faire pour que la macro s’arrête normalement quand le curseur arrive en haut de la fenêtre ?
Merci d’avance
A voir également:
- Boucle VISUAL BASIC EXCEL
- Visual basic - Télécharger - Langages
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Microsoft 365 basic - Accueil - Microsoft Office
- Visual c++ 2019 - Guide
1 réponse
Bonsoir,
J'espère que c'est un exercise car ça n'est pas la façon la plus efficace de déplacer le curseur que de le faire ligne par ligne et en plus en faisant un .select à chaque fois...
Sinon il faut que tu testes la position de la ligne active avec qcq chose comme :
Do while ActiveCell.row > 1
...
eric
J'espère que c'est un exercise car ça n'est pas la façon la plus efficace de déplacer le curseur que de le faire ligne par ligne et en plus en faisant un .select à chaque fois...
Sinon il faut que tu testes la position de la ligne active avec qcq chose comme :
Do while ActiveCell.row > 1
...
eric
MERCI BCP
Pour déplacer le curseur j'utilise
Range(Selection, Selection.End(xlUp)).Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlToLeft)).Select
Range(Selection, Selection.End(xlToRight)).Select
Mais ces commandes ne me permettent pas de savoir si le curseur est arrivé au bout de mon tableau car j'ai des cellules vides à l'interieur de mes tableaux.
si tu veux mettre qcq chose sur la (dernière ligne saisie + 1) de la colonne C tu peux faire directement :
[C65536].end(xlup).offset(1,0).value = "test"
eric
MERCI pour la méthode.
Effectivement c'est beaucoup plus efficace pour les grands tableaux
A+