OVH Cloud OVH Cloud

selection partielle de ActiveCell.CurrentRegion

47 réponses
Avatar
J
Bonjour (XL2000)VBA
j'ai des range construits sur le même modèle, (colonne A à F) mais d'un
nombre de lignes variables.
le nombre de ces range est variable.

Quand j'ai une cellule d'un range qui est sélectionnée, je sais
sélectionner tout le bloc : ActiveCell.CurrentRegion.Select

Mais comment sélectionner seulement "de la 1ere cellule de la colonne B
à la dernière cellule de la colle F" de cette CurrentRegion?

merci,à tous et bon dimanche
@+
J@@

10 réponses

1 2 3 4 5
Avatar
FL
Bonjour,
essaies cela

Range( "B"& Range("B1").end(xldown).row & ":F"&
Range("F65536").end(xlup).row)

Cordialement
FL


"J@@" a écrit dans le message de news:

Bonjour (XL2000)VBA
j'ai des range construits sur le même modèle, (colonne A à F) mais d'un
nombre de lignes variables.
le nombre de ces range est variable.

Quand j'ai une cellule d'un range qui est sélectionnée, je sais
sélectionner tout le bloc : ActiveCell.CurrentRegion.Select

Mais comment sélectionner seulement "de la 1ere cellule de la colonne B à
la dernière cellule de la colle F" de cette CurrentRegion?

merci,à tous et bon dimanche
@+
J@@


Avatar
lSteph
Bonjour J@@,

Ceci irait-il:

Sub CurRegSaufPremCol()
With ActiveCell.CurrentRegion
Range(.Cells(2), .Cells(.Cells.Count)).Select
End With
End Sub

'Cordialement.

LSteph

"J@@" a écrit dans le message de news:

Bonjour (XL2000)VBA
j'ai des range construits sur le même modèle, (colonne A à F) mais d'un
nombre de lignes variables.
le nombre de ces range est variable.

Quand j'ai une cellule d'un range qui est sélectionnée, je sais
sélectionner tout le bloc : ActiveCell.CurrentRegion.Select

Mais comment sélectionner seulement "de la 1ere cellule de la colonne B à
la dernière cellule de la colle F" de cette CurrentRegion?

merci,à tous et bon dimanche
@+
J@@


Avatar
JB
Bonjour,

[B1].Resize([B65000].End(xlUp).Row, 5).Select

JB


Bonjour (XL2000)VBA
j'ai des range construits sur le même modèle, (colonne A à F) mais d'un
nombre de lignes variables.
le nombre de ces range est variable.

Quand j'ai une cellule d'un range qui est sélectionnée, je sais
sélectionner tout le bloc : ActiveCell.CurrentRegion.Select

Mais comment sélectionner seulement "de la 1ere cellule de la colonne B
à la dernière cellule de la colle F" de cette CurrentRegion?

merci,à tous et bon dimanche
@+
J@@


Avatar
Ange Ounis
Autre lecture de ta question, si tu souhaites absolument te référer à la
séquence ActiveCell.CurrentRegion :

With ActiveCell.CurrentRegion
.Range("B1:F" & .Range("F" & .Cells.Count).End(xlUp).Row).Select
End With

----------
Ange Ounis
----------

Bonjour (XL2000)VBA
j'ai des range construits sur le même modèle, (colonne A à F) mais d'un
nombre de lignes variables.
le nombre de ces range est variable.

Quand j'ai une cellule d'un range qui est sélectionnée, je sais
sélectionner tout le bloc : ActiveCell.CurrentRegion.Select

Mais comment sélectionner seulement "de la 1ere cellule de la colonne B
à la dernière cellule de la colle F" de cette CurrentRegion?

merci,à tous et bon dimanche
@+
J@@


Avatar
lSteph
Bonjour Frédéric,
?
cela ne semble pas très éloigné de ma proposition!

Cordialement.

lSteph
"Ange Ounis" a écrit dans le message de news:

Autre lecture de ta question, si tu souhaites absolument te référer à la
séquence ActiveCell.CurrentRegion :

With ActiveCell.CurrentRegion
.Range("B1:F" & .Range("F" & .Cells.Count).End(xlUp).Row).Select
End With

----------
Ange Ounis
----------

Bonjour (XL2000)VBA
j'ai des range construits sur le même modèle, (colonne A à F) mais d'un
nombre de lignes variables.
le nombre de ces range est variable.

Quand j'ai une cellule d'un range qui est sélectionnée, je sais
sélectionner tout le bloc : ActiveCell.CurrentRegion.Select

Mais comment sélectionner seulement "de la 1ere cellule de la colonne B
à la dernière cellule de la colle F" de cette CurrentRegion?

merci,à tous et bon dimanche
@+
J@@




Avatar
Ange Ounis
Pas très éloigné en effet, mais les résultats sont cependant très différents :

http://cjoint.com/?iBm5w5WaEz

D'où mon commentaire sur une 'lecture différente' de la question. Seul J@@
pourra nous dire ce qui correspond à son besoin (si qqchose y correspond:)

----------
Ange Ounis
----------

Bonjour Frédéric,
?
cela ne semble pas très éloigné de ma proposition!

Cordialement.

lSteph
"Ange Ounis" a écrit dans le message de news:

Autre lecture de ta question, si tu souhaites absolument te référer à la
séquence ActiveCell.CurrentRegion :

With ActiveCell.CurrentRegion
.Range("B1:F" & .Range("F" & .Cells.Count).End(xlUp).Row).Select
End With

----------
Ange Ounis
----------

Bonjour (XL2000)VBA
j'ai des range construits sur le même modèle, (colonne A à F) mais d'un
nombre de lignes variables.
le nombre de ces range est variable.

Quand j'ai une cellule d'un range qui est sélectionnée, je sais
sélectionner tout le bloc : ActiveCell.CurrentRegion.Select

Mais comment sélectionner seulement "de la 1ere cellule de la colonne B
à la dernière cellule de la colle F" de cette CurrentRegion?

merci,à tous et bon dimanche
@+
J@@








Avatar
Jacky
Bonjour,
Mais comment sélectionner seulement "de la 1ere cellule de la colonne B
à la dernière cellule de la colle F" de cette CurrentRegion?


Peut-être:

Range("b" & ActiveCell.CurrentRegion.Row & ":f" & Selection.Rows.Count +
ActiveCell.CurrentRegion.Row - 1).Select

Salutations
JJ

Avatar
JB
[B1].Resize(ActiveCell.CurrentRegion.Rows.Count, 5).Select

JB




Bonjour (XL2000)VBA
j'ai des range construits sur le même modèle, (colonne A à F) mais d'un
nombre de lignes variables.
le nombre de ces range est variable.

Quand j'ai une cellule d'un range qui est sélectionnée, je sais
sélectionner tout le bloc : ActiveCell.CurrentRegion.Select

Mais comment sélectionner seulement "de la 1ere cellule de la colonne B
à la dernière cellule de la colle F" de cette CurrentRegion?

merci,à tous et bon dimanche
@+
J@@


Avatar
lSteph
Merci , pas vu cette subtilité
ce qui donne effectivement autre chose
et en relisant le sujet il est clair que ce n'est pas évident!

Bon Dimanche.

lSteph

"Ange Ounis" a écrit dans le message de news:

Pas très éloigné en effet, mais les résultats sont cependant très
différents :

http://cjoint.com/?iBm5w5WaEz

D'où mon commentaire sur une 'lecture différente' de la question. Seul J@@
pourra nous dire ce qui correspond à son besoin (si qqchose y correspond:)

----------
Ange Ounis
----------

Bonjour Frédéric,
?
cela ne semble pas très éloigné de ma proposition!

Cordialement.

lSteph
"Ange Ounis" a écrit dans le message de news:

Autre lecture de ta question, si tu souhaites absolument te référer à la
séquence ActiveCell.CurrentRegion :

With ActiveCell.CurrentRegion
.Range("B1:F" & .Range("F" & .Cells.Count).End(xlUp).Row).Select
End With

----------
Ange Ounis
----------

Bonjour (XL2000)VBA
j'ai des range construits sur le même modèle, (colonne A à F) mais d'un
nombre de lignes variables.
le nombre de ces range est variable.

Quand j'ai une cellule d'un range qui est sélectionnée, je sais
sélectionner tout le bloc : ActiveCell.CurrentRegion.Select

Mais comment sélectionner seulement "de la 1ere cellule de la colonne
B à la dernière cellule de la colle F" de cette CurrentRegion?

merci,à tous et bon dimanche
@+
J@@









Avatar
J
Bonjour Ange & lSteph
c'était ma question du samedi soir, un peu embrumée ;-)

J'ai comparé vos 2 propositions :
Le départ en B est OK pour les 2
- Le code lSteph :
va bien à la dernière ligne de la CurrentRegion (définie par la colonne
A), mais si par malheur il y a qq chose en G, va jusqu'en G au lieu de
s'arrêter en F;
- Le code noté "FS":
reste bien de B à F, et va à la dernière ligne de F, mais ne me récupère
pas les dernières saisies en B si elles sont plus basses.

merci les amis
@+
J@@

Merci , pas vu cette subtilité
ce qui donne effectivement autre chose
et en relisant le sujet il est clair que ce n'est pas évident!

Bon Dimanche.

lSteph

"Ange Ounis" a écrit dans le message de news:

Pas très éloigné en effet, mais les résultats sont cependant très
différents :

http://cjoint.com/?iBm5w5WaEz

D'où mon commentaire sur une 'lecture différente' de la question. Seul J@@
pourra nous dire ce qui correspond à son besoin (si qqchose y correspond:)

----------
Ange Ounis
----------

Bonjour Frédéric,
?
cela ne semble pas très éloigné de ma proposition!

Cordialement.

lSteph
"Ange Ounis" a écrit dans le message de news:

Autre lecture de ta question, si tu souhaites absolument te référer à la
séquence ActiveCell.CurrentRegion :

With ActiveCell.CurrentRegion
.Range("B1:F" & .Range("F" & .Cells.Count).End(xlUp).Row).Select
End With

----------
Ange Ounis
----------

Bonjour (XL2000)VBA
j'ai des range construits sur le même modèle, (colonne A à F) mais d'un
nombre de lignes variables.
le nombre de ces range est variable.

Quand j'ai une cellule d'un range qui est sélectionnée, je sais
sélectionner tout le bloc : ActiveCell.CurrentRegion.Select

Mais comment sélectionner seulement "de la 1ere cellule de la colonne
B à la dernière cellule de la colle F" de cette CurrentRegion?

merci,à tous et bon dimanche
@+
J@@











1 2 3 4 5