copy_paste entre classeurs

elhich · 25 Mai 2004

salut forum

j'ai pas reussi à copier une plage de cellules d'une feuille1 de classeur1 vers la feuille1 de classeur2
ces instrucion ne marche pas sauf dans la meme feuille :

Workbooks.Open Filename:="c:\classeur2.xls"
Workbooks("claisseur1").Sheets("feuille1").Range("a1:i12").Copy
ActiveSheet.Paste Destination:=Workbooks("classeur2").Sheets("feuille1").Range("J1:r12")

j'ai besoin de votre aide si possibe
merci à tout le monde

Chris · 25 Mai 2004

Essai plutôt dans ce sens la :

Workbooks.Open Filename:="c:\classeur2.xls"

Workbooks("classeur1").Sheets("feuille1").Range("a1:i12").Copy
Workbooks("classeur2").Sheets("feuille1").Range("J1").past

Je n'ai pas le temps de vérifier, mais il me semble que tu dois passer par un :
Workbooks("classeur2").select
Sheets("feuille1").Range("J1").past

elhich · 25 Mai 2004

salut Chris
merci pour votre reponce mais ça marche pas aussi
les lignes des codes que j'ai passé marche seulement dans la meme classeur mais je vois pourquoi ça marche pas lors de passage d'un classeur à un autre

LaurentTBT · 25 Mai 2004

Bonsoir,

Avec PasteSpecial, peut-être?
Workbooks("classeur1").Worksheets("feuille1").Range("a1:i12").Copy
Workbooks("classeur2").Worksheets("feuille1").Range("J1").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False

Bye

elhich · 26 Mai 2004

merci Laurent TBT
mais j'ai pas reussi aussi il apparait ce message d'erreur
"canot change part of a merget cell"

copy_paste entre classeurs

elhich

Guest

Chris

Guest

elhich

Guest

LaurentTBT

Guest

elhich

Guest

Discussions similaires