OVH Cloud OVH Cloud

Copier - coller dans une macro

2 réponses
Avatar
Jean-marie
Bonjour a tous

je mets en place une macro sous excel avec un copier=20
coller d'un onglet d'un fichier vers un autre

dans ma macro je proc=E9de =E0 l'ouverture du fichier de=20
r=E9f=E9rence, mais lorsque j'execute la macro il y a un=20
message comme quoi
le presse papier contient un trop grande nombre=20
d'informations=20
et la je suis oblig=E9 de cliquer non
y a t il une solution pour supprimer cette =E9tape
voici ma macro

ChDir "W:\COMPTABILITE GENERALE"
Workbooks.Open FileName:=3D _
"\\TITUS\CSF$\COMPTABILITE GENERALE\Table de=20
r=E9f=E9rence Carat.xls"
Cells.Select
Selection.Copy
Windows("Programme.xls").Activate
Cells.Select
ActiveSheet.Paste
Windows("Table de r=E9f=E9rence Carat.xls").Activate
ActiveWorkbook.Close
Sheets("Infos").Select
Range("G9").Select


merci pour votre aide

jml
93.26

2 réponses

Avatar
Vincent.
Bonjour
Application.DisplayAlerts = False te permet d'éviter les
messages de confirmation envoyés par excel.
Application.DisplayAlerts = True avant la fin de la macro
pour revenir à l'état initial !

-----Message d'origine-----
Bonjour a tous

je mets en place une macro sous excel avec un copier
coller d'un onglet d'un fichier vers un autre

dans ma macro je procéde à l'ouverture du fichier de
référence, mais lorsque j'execute la macro il y a un
message comme quoi
le presse papier contient un trop grande nombre
d'informations
et la je suis obligé de cliquer non
y a t il une solution pour supprimer cette étape
voici ma macro

ChDir "W:COMPTABILITE GENERALE"
Workbooks.Open FileName:= _
"TITUSCSF$COMPTABILITE GENERALETable de
référence Carat.xls"
Cells.Select
Selection.Copy
Windows("Programme.xls").Activate
Cells.Select
ActiveSheet.Paste
Windows("Table de référence Carat.xls").Activate
ActiveWorkbook.Close
Sheets("Infos").Select
Range("G9").Select


merci pour votre aide

jml
93.26


.



Avatar
twinley
Bonjour,
pour vider la RAM buffer après un copié-collé:Application.CutcopyMode False


--
à+twinley
"Jean-marie" a écrit dans le message de
news:344401c47eb1$da029510$
Bonjour a tous

je mets en place une macro sous excel avec un copier
coller d'un onglet d'un fichier vers un autre

dans ma macro je procéde à l'ouverture du fichier de
référence, mais lorsque j'execute la macro il y a un
message comme quoi
le presse papier contient un trop grande nombre
d'informations
et la je suis obligé de cliquer non
y a t il une solution pour supprimer cette étape
voici ma macro

ChDir "W:COMPTABILITE GENERALE"
Workbooks.Open FileName:= _
"TITUSCSF$COMPTABILITE GENERALETable de
référence Carat.xls"
Cells.Select
Selection.Copy
Windows("Programme.xls").Activate
Cells.Select
ActiveSheet.Paste
Windows("Table de référence Carat.xls").Activate
ActiveWorkbook.Close
Sheets("Infos").Select
Range("G9").Select


merci pour votre aide

jml
93.26