[VB/VBA/VBS] Mauvaise détection de plage.

Marsh Posté le 10-12-2009 à 15:43:31

Bonjour,

je viens de me lancer dans VBA et j'avance petit à petit. Mais, je viens de me confronter à mon 1er blocage.

Code :

top = "A2"
Set Comptes = Range(top, Range(top).End(xlDown))
Debug.Print "Adresse de la plage des comptes : " & Comptes.Address

Pourquoi est-ce que ce code me "détecte" bien la plage lorsqu'il y a plus de 2 lignes, mais pas lorsqu'il y en a qu'une ?
Si je n'ai qu'une ligne, la plage à l'adresse $A$2:$A$65536.

Merci d'avance

Marsh Posté le 10-12-2009 à 15:43:31

Marsh Posté le 10-12-2009 à 20:07:02

Bonsoir et Bienvenue au Club!

Un 1er blocage ça s'arrose! Tu paies ta mousse? [:kimouss]

C'est le début d'une longue série!! Mais quelle joie quand ça se débloque!

Bon, pour répondre à ta question, c'est parce qu'il cherche la dernière cellule non-vide de la colonne après la cellule de départ, non-vide également, c'est pour ça que ça ne marcherait pas non plus en essayant de bidouiller et de commencer une ligne + haut, que ce soit la ligne 1 ou la 324, il faut toujours 2 lignes minimum.

A+

---------------
Olympus OM-D EM-5 + 14-42

Marsh Posté le 10-12-2009 à 20:14:12

merci
j'ai finalement changé de méthode. Je pars d'en bas et je remonte xlup

Je suis adepte du vbs quick&dirty depuis des années donc je ne suis pas _trop_ dépaysé.

Marsh Posté le 10-12-2009 à 20:19:32

Précision: la dernière cellule non-vide de la colonne APRES celle de départ signifie que s'il y a 4 cellules non-vides, puis 1 cellule vide, puis 4 cellules non-vides, la fonction XLDOWN ne renverra l'adresse que de la 4° cellule, pas celle de la 9°.

Marsh Posté le 10-12-2009 à 20:34:00

j'avais saisi cette nuance. merci. C'est le APRES que j'avais zappé.

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *