Dernière colonne de la zone active

Le
Steph
Bonjour,

Je cherche le moyen de trouver la dernière colonne de la zone active.

Avez-vous une idée ?

--
Pour la 1er case active lors de la sélection:
Ligne = ActiveCell.Row
Colonne = ActiveCell.Column

Pour la zone entière
Zone = Application.ActiveWindow.RangeSelection.Address


Exemple: zone active = $C$9:$H$13 comment extraire la colonne H (ou 8) de la
zone active ?

D'avance merci,

Steph
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
JB
Le #4322891
Bonjour,

colonne = Range(Split(Selection.Address, ":")(1)).Column
ligne = Range(Split(Selection.Address, ":")(1)).Row

JB

On 20 mar, 11:13, "Steph"
Bonjour,

Je cherche le moyen de trouver la dernière colonne de la zone active.

Avez-vous une idée ?

--------------------------------------------
Pour la 1er case active lors de la sélection:
Ligne = ActiveCell.Row
Colonne = ActiveCell.Column

Pour la zone entière
Zone = Application.ActiveWindow.RangeSelection.Address
---------------------------------------------

Exemple: zone active = $C$9:$H$13 comment extraire la colonne H (ou 8) de la
zone active ?

D'avance merci,

Steph


Steph
Le #4322851
Merci pour ta réponse

Saurais tu également me montrer comment récupérer la 1er colonne de la zone
active pour le cas ou lorsque la 1er colonne n'était pas la 1er colonne
sélectionnée (le cas d'une sélection de droite à gauche) ?

merci



"JB"
Bonjour,

colonne = Range(Split(Selection.Address, ":")(1)).Column
ligne = Range(Split(Selection.Address, ":")(1)).Row

JB

On 20 mar, 11:13, "Steph"
Bonjour,

Je cherche le moyen de trouver la dernière colonne de la zone active.

Avez-vous une idée ?

--------------------------------------------
Pour la 1er case active lors de la sélection:
Ligne = ActiveCell.Row
Colonne = ActiveCell.Column

Pour la zone entière
Zone = Application.ActiveWindow.RangeSelection.Address
---------------------------------------------

Exemple: zone active = $C$9:$H$13 comment extraire la colonne H (ou 8) de
la
zone active ?

D'avance merci,

Steph


JB
Le #4322841
Le sens de la sélection n'a pas d'importance.

Colonne de la première cellule d'une sélection:

colonne = Range(Split(Selection.Address, ":")(0)).Column

JB


On 20 mar, 11:40, "Steph"
Merci pour ta réponse

Saurais tu également me montrer comment récupérer la 1er colonne de la zone
active pour le cas ou lorsque la 1er colonne n'était pas la 1er colonne
sélectionnée (le cas d'une sélection de droite à gauche) ?

merci

"JB"
Bonjour,

colonne = Range(Split(Selection.Address, ":")(1)).Column
ligne = Range(Split(Selection.Address, ":")(1)).Row

JB

On 20 mar, 11:13, "Steph"


Bonjour,

Je cherche le moyen de trouver la dernière colonne de la zone active.

Avez-vous une idée ?

--------------------------------------------
Pour la 1er case active lors de la sélection:
Ligne = ActiveCell.Row
Colonne = ActiveCell.Column

Pour la zone entière
Zone = Application.ActiveWindow.RangeSelection.Address
---------------------------------------------

Exemple: zone active = $C$9:$H$13 comment extraire la colonne H (ou 8 ) de
la
zone active ?

D'avance merci,

Steph- Masquer le texte des messages précédents -


- Afficher le texte des messages précédents -



Steph
Le #4322831
Merci beaucoup,

Passe une excellente journée,

Steph

"JB"
Le sens de la sélection n'a pas d'importance.

Colonne de la première cellule d'une sélection:

colonne = Range(Split(Selection.Address, ":")(0)).Column

JB


On 20 mar, 11:40, "Steph"
Merci pour ta réponse

Saurais tu également me montrer comment récupérer la 1er colonne de la
zone
active pour le cas ou lorsque la 1er colonne n'était pas la 1er colonne
sélectionnée (le cas d'une sélection de droite à gauche) ?

merci

"JB"
Bonjour,

colonne = Range(Split(Selection.Address, ":")(1)).Column
ligne = Range(Split(Selection.Address, ":")(1)).Row

JB

On 20 mar, 11:13, "Steph"


Bonjour,

Je cherche le moyen de trouver la dernière colonne de la zone active.

Avez-vous une idée ?

--------------------------------------------
Pour la 1er case active lors de la sélection:
Ligne = ActiveCell.Row
Colonne = ActiveCell.Column

Pour la zone entière
Zone = Application.ActiveWindow.RangeSelection.Address
---------------------------------------------

Exemple: zone active = $C$9:$H$13 comment extraire la colonne H (ou 8)
de
la
zone active ?

D'avance merci,

Steph- Masquer le texte des messages précédents -


- Afficher le texte des messages précédents -



Publicité
Poster une réponse
Anonyme