Géométrie variable : se positionner sur une cellule

Géométrie variable : se positionner sur une cellule - VB/VBA/VBS - Programmation

Marsh Posté le 29-10-2006 à 23:08:20    

Je débute en VBA et j'ai un petit soucis.
 
je dispose d'un tableau dont la longueur est variable selon les hypothèses.
je souhaite me positionner dans une cellule située en dessous de la dernière ligne
 
exemple :
 
A                B                 C                       D
Bouteille       1                 23                     OUI
Sac             2                 45                     OUI
Chapeau      3                  38                     NON
                                      X
 
nbre d'exemples extraits = 3 (cellule nommée"extraits" )
je veux me positionner en C4
 
macro que j'ai trouvé:
range(cells(1 + range("extraits" ),3).select
 
malheureusement, cette solution ne fonctionne pas
merci pour votre aide

Reply

Marsh Posté le 29-10-2006 à 23:08:20   

Reply

Marsh Posté le 30-10-2006 à 11:59:42    

il existe un code tout simple :
 
dim A as long
A=cells(65536,3).end(xlup).row
 
cela te donne la dernière cellule remplie de la 3ème colonne.
 
et donc appliqué à ton code :  
 
range(cells(1 + A,3).select

Reply

Marsh Posté le 30-10-2006 à 13:49:34    

je viens d'essayer mais ça bug
 
Range(Cells(1 + Cells(65536, 3).End(xlUp).Row, 3)).Select
 
je ne vois pas l'erreur?

Reply

Marsh Posté le 30-10-2006 à 15:22:40    

parceque VB n'aime pas que tu définisse une cell par une autre cell.
d'ou le fait (qui n'est pas facultatif) de passer par un A=Cells(65536, 3).End(xlUp).Row

Reply

Sujets relatifs:

Leave a Replay

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