OVH Cloud OVH Cloud

Cellule Active

8 réponses
Avatar
AbSoLuT
Bonjour,

J'aimerai savoir comment a l'aide d'une macro copier la cellule active + la
cellule qui suis
ex: copy cell active A5 et A6
mais ce n'est pas toujour A5 et A6 sa peut être exemple B455-B456
pour le moment j'ai juste reussi a faire ActiveCell.Copy
mais il me faut aussi l'autre en dessous :)

en esperant que quelqu'un puisse m'aider la dessus :)

8 réponses

Avatar
...Patrick
Hello,

range(activecell,activecell.offset(1,0)).copy / select

...Patrick




"AbSoLuT" <absolut> a écrit dans le message de news:

Bonjour,

J'aimerai savoir comment a l'aide d'une macro copier la cellule active +
la cellule qui suis
ex: copy cell active A5 et A6
mais ce n'est pas toujour A5 et A6 sa peut être exemple B455-B456
pour le moment j'ai juste reussi a faire ActiveCell.Copy
mais il me faut aussi l'autre en dessous :)

en esperant que quelqu'un puisse m'aider la dessus :)



Avatar
LSteph
Bonsoir ,
la cellule active
Activecell

celle qui suit dans l'ordre d'une feuille serait à sa droite .offset(0,1)
mais tel que demandé en dessous .offset(1,0)
Ainsi ex:

Range(Activecell,Activecell.offset(1,0)).copy


'lSteph


"AbSoLuT" <absolut> a écrit dans le message de news:

Bonjour,

J'aimerai savoir comment a l'aide d'une macro copier la cellule active +
la cellule qui suis
ex: copy cell active A5 et A6
mais ce n'est pas toujour A5 et A6 sa peut être exemple B455-B456
pour le moment j'ai juste reussi a faire ActiveCell.Copy
mais il me faut aussi l'autre en dessous :)

en esperant que quelqu'un puisse m'aider la dessus :)



Avatar
anonymousA
bonjour,

Range(ActiveCell, ActiveCell.Offset(1, 0)).Copy

A+

Bonjour,

J'aimerai savoir comment a l'aide d'une macro copier la cellule active + la
cellule qui suis
ex: copy cell active A5 et A6
mais ce n'est pas toujour A5 et A6 sa peut être exemple B455-B456
pour le moment j'ai juste reussi a faire ActiveCell.Copy
mais il me faut aussi l'autre en dessous :)

en esperant que quelqu'un puisse m'aider la dessus :)




Avatar
Jacques93
Bonsoir AbSoLuT,

Essaie

Dim r As Range
Set r = Range(ActiveCell.Address & ":" & _
ActiveCell.Offset(1, 0).Address)
r.Copy

Bonjour,

J'aimerai savoir comment a l'aide d'une macro copier la cellule active + la
cellule qui suis
ex: copy cell active A5 et A6
mais ce n'est pas toujour A5 et A6 sa peut être exemple B455-B456
pour le moment j'ai juste reussi a faire ActiveCell.Copy
mais il me faut aussi l'autre en dessous :)

en esperant que quelqu'un puisse m'aider la dessus :)





--
Cordialement,

Jacques.

Avatar
ChrisV
Bonjour AbSoLuT,

ActiveCell.Resize(2, 1).Copy


ChrisV


"AbSoLuT" <absolut> a écrit dans le message de news:

Bonjour,

J'aimerai savoir comment a l'aide d'une macro copier la cellule active +
la cellule qui suis
ex: copy cell active A5 et A6
mais ce n'est pas toujour A5 et A6 sa peut être exemple B455-B456
pour le moment j'ai juste reussi a faire ActiveCell.Copy
mais il me faut aussi l'autre en dessous :)

en esperant que quelqu'un puisse m'aider la dessus :)



Avatar
Jacques93
Bonjour ChrisV

J'étais le plus nul dans ma réponse, mais bon, tout le monde s'est fait
rectifier :-D , d'un sens ça me rassure, en fait, j'étais très
pédagogique ;-)

Bonjour AbSoLuT,

ActiveCell.Resize(2, 1).Copy



--
Cordialement,

Jacques.

Avatar
ChrisV
Salut Jacques,

Heureusement, il n'y a pas qu'un seul chemin qui mène à Rome...
;-)


ChrisV


"Jacques93" a écrit dans le message de
news: uAZ%
Bonjour ChrisV

J'étais le plus nul dans ma réponse, mais bon, tout le monde s'est fait
rectifier :-D , d'un sens ça me rassure, en fait, j'étais très pédagogique
;-)

Bonjour AbSoLuT,

ActiveCell.Resize(2, 1).Copy



--
Cordialement,

Jacques.



Avatar
AV
Une autre (que j'aime bien), en utilisant les références relatives :

ActiveCell.Range("A1:A2").Copy

AV