OVH Cloud OVH Cloud

Utilisation de SpecialCells

4 réponses
Avatar
Ludovic
Bonsoir,

En supposant avoir 15 lignes dans la colonne A et seulement 10 dans les
colonnes B, C ... je cherche à trouver la dernière ligne utilisée de la
colonne B.

Mais avec un code du type :

Range("B:B").Activate ' Ou Range("B1").Activate
ActiveCell.SpecialCells(xlCellTypeLastCell).Activate '
lLigMax = ActiveCell.Row

je récupère systématiquement 15.
J'ai beau lire et relire le help, tout se passe comme si Excel ne tenait
aucun compte de la zone activée et prenait toujours cells (donc la totalité
de la zone utilisée).

Où est-ce que je n'ai rien compris ?

--
Ludovic

4 réponses

Avatar
Daniel
Bonsoir.
lLigMax = Range("B65536").end(xlUp).row
Cordialement.
Daniel
"Ludovic" a écrit dans le message de news:

Bonsoir,

En supposant avoir 15 lignes dans la colonne A et seulement 10 dans les
colonnes B, C ... je cherche à trouver la dernière ligne utilisée de la
colonne B.

Mais avec un code du type :

Range("B:B").Activate ' Ou Range("B1").Activate
ActiveCell.SpecialCells(xlCellTypeLastCell).Activate '
lLigMax = ActiveCell.Row

je récupère systématiquement 15.
J'ai beau lire et relire le help, tout se passe comme si Excel ne tenait
aucun compte de la zone activée et prenait toujours cells (donc la
totalité de la zone utilisée).

Où est-ce que je n'ai rien compris ?

--
Ludovic




Avatar
Ludovic
Merci Daniel ... mais pourquoi le bout de code que je donnais en exemple ne
marche pas ?
Cordialement.

Bonsoir.
lLigMax = Range("B65536").end(xlUp).row
Cordialement.
Daniel
"Ludovic" a écrit dans le message de news:

Bonsoir,

En supposant avoir 15 lignes dans la colonne A et seulement 10 dans
les colonnes B, C ... je cherche à trouver la dernière ligne
utilisée de la colonne B.

Mais avec un code du type :

Range("B:B").Activate ' Ou Range("B1").Activate
ActiveCell.SpecialCells(xlCellTypeLastCell).Activate '
lLigMax = ActiveCell.Row

je récupère systématiquement 15.
J'ai beau lire et relire le help, tout se passe comme si Excel ne
tenait aucun compte de la zone activée et prenait toujours cells
(donc la totalité de la zone utilisée).

Où est-ce que je n'ai rien compris ?

--
Ludovic




Avatar
jb
Bonjour,

x=Range("b65000").End(xlup).Row renvoie dans la variable x le no de
la dernière ligne de la colonne B

Range("b65000").End(xlup).Select positionne le curseur sur la
dernère ligne de la colonne B

Cordialement JB
Avatar
Daniel
Bonjour.
ActiveCell.SpecialCells(xlCellTypeLastCell).Activate sélectionne la cellule
à l'intersection de la dernière ligne utilisée (dans ton cas la ligne 15) et
de la colonne la plus à droite utilisée; comme le fait l'emploi des touches
CTRL+Fin.
Daniel
"Ludovic" a écrit dans le message de news:

Merci Daniel ... mais pourquoi le bout de code que je donnais en exemple
ne marche pas ?
Cordialement.

Bonsoir.
lLigMax = Range("B65536").end(xlUp).row
Cordialement.
Daniel
"Ludovic" a écrit dans le message de news:

Bonsoir,

En supposant avoir 15 lignes dans la colonne A et seulement 10 dans
les colonnes B, C ... je cherche à trouver la dernière ligne
utilisée de la colonne B.

Mais avec un code du type :

Range("B:B").Activate ' Ou Range("B1").Activate
ActiveCell.SpecialCells(xlCellTypeLastCell).Activate '
lLigMax = ActiveCell.Row

je récupère systématiquement 15.
J'ai beau lire et relire le help, tout se passe comme si Excel ne
tenait aucun compte de la zone activée et prenait toujours cells
(donc la totalité de la zone utilisée).

Où est-ce que je n'ai rien compris ?

--
Ludovic