Bonjour,
Je n'arrive pas a adapter le code suivant :
Sheets("Datas").Select
Range("J7:J32").Select
Selection.Copy
Workbooks.Open "X:\SITE\FACIL\ST\EXPLOITATION\Rapports\Rapport facilities\2009\Avril\April Facilities Report.process..xls"
Workbooks("April Facilities Report.process..xls").Activate
Windows("April Facilities Report.process..xls").Activate
Sheets("Chemical data").Select
Range("HU21").Select
ActiveSheet.Paste
En faite je souhaite changer le "paste" en "collage spécial de la valeur" mais lorsque je le fait la macro bug. Si quelqu'un peut m aider ce serait sympa.
Merci d'avance
Sang1
Je n'arrive pas a adapter le code suivant :
Sheets("Datas").Select
Range("J7:J32").Select
Selection.Copy
Workbooks.Open "X:\SITE\FACIL\ST\EXPLOITATION\Rapports\Rapport facilities\2009\Avril\April Facilities Report.process..xls"
Workbooks("April Facilities Report.process..xls").Activate
Windows("April Facilities Report.process..xls").Activate
Sheets("Chemical data").Select
Range("HU21").Select
ActiveSheet.Paste
En faite je souhaite changer le "paste" en "collage spécial de la valeur" mais lorsque je le fait la macro bug. Si quelqu'un peut m aider ce serait sympa.
Merci d'avance
Sang1