copier coller sur une plage variable

flo2002

XLDnaute Impliqué
re bonjour le forum,

je cherche à faire une macro qui va copier des formules (c2:c2) dans une plage de donnée variable. en effet, la plage commence ou C s'arrete et elle se termine ou B s'arrete.

J'ai commencer à faire un code qui me parais à coté de la plaque, et donc j'apprécierais toute forme d'aide (meme moral)

Merci par avance.

ci joint le code qui m'ennuie.


sheets('Feuil1').range('C2:E2').Select
Selection.Copy

Dim FLC1 As Variant
Dim FLC2 As Variant

FLC1 = range('b65536').End(xlUp).Offset(1, 1)
FLC2 = range('C200:E200').End(xlUp).Offset(1, 0)

Sheets('Feuil1').FLC2& FLC1.Select
Selection.Paste
 
A

Amydale

Guest
J'ai peur de ne pas trop comprendre exactement ce que tu veux faire !

Sheets('Feuil1').FLC2& FLC1.Select ' ne veut rien dire
du tout.

Si tu veux coller des données
Selection.Paste tu mélanges un peu en fait lol
Activesheet.Paste ' coller dans la sélection de la feuille active

Range('A10').PasteSpecial xlPasteAll ' coller en cellule A10

Si tu veux utiliser plusieurs cellules qui ne se touchent pas, il faut mettre range('A10,E15').select par exemple.

Voila ce que je te propose :

Sheets('Feuil1').range('C2:E2').Select
Selection.Copy

Sheets('Feuil1').range('A10,E15').Select
Selection.PasteSpecial

et si les sélections ne t'interessent pas alors
Sheets('Feuil1').Range('C2:E2').Copy Sheets('Feuil1').Range('A10,E15')

et ca tiens meme en une ligne :eek:)

Bon courage
 

flo2002

XLDnaute Impliqué
Merci mais ce que je voudrai c'est qu'il prenne en compte le faite que la plage est variable:

la premiere cellule de la plage à gauche se trouve à la suite de la colonne C
la derniere cellule de la plage à gauche se trouve la ou B s'arrete.
d'ou le probleme...

merci comme meme
 

Discussions similaires

Statistiques des forums

Discussions
312 681
Messages
2 090 884
Membres
104 688
dernier inscrit
Euclid92