Macro excel qui ne fonctionne pas

Fermé
tottiasr - 18 avril 2011 à 21:01
melanie1324 Messages postés 1504 Date d'inscription vendredi 25 mai 2007 Statut Membre Dernière intervention 31 janvier 2018 - 26 mai 2011 à 14:01
Bonjour,

ci dessous le code d'une macro, je ne comprend pas pourquoi macropg ne fonctionne pas alors que lorsque je met l'une ou l'autre et pas les deux cela fonctionne
si quelqu'un peut m'aider merci


Sub COPIOM()
'
' COPIOM Macro
' Macro enregistrée le 18/04/2011 par Michael
'

Application.EnableEvents = False
Workbooks.Open Filename:="C:\Users\Michael\Desktop\Test2.xls"
    Range("C5:E8").Select
    Selection.Copy
    Windows("test.xls").Activate
    Range("B2:D5").Select
    ActiveSheet.Paste
    Windows("test.xls").Activate
End Sub
Sub MACROPG()
'
' MACROPG Macro
' Macro enregistrée le 18/04/2011 par Michael
'

'
    Windows("test.xls").Activate
    Range("B2:D5").Select
    Application.CutCopyMode = False
    Selection.Copy
    Windows("test2.xls").Activate
    Range("C5:E8").Select
    ActiveSheet.Paste
End Sub
A voir également:

1 réponse

melanie1324 Messages postés 1504 Date d'inscription vendredi 25 mai 2007 Statut Membre Dernière intervention 31 janvier 2018 154
26 mai 2011 à 14:01
Bonjour,

Lorsque tu lances La macro Macropg, ton fichier text.xls est-il ouvert?

Si tel n'est pas le cas, c'est pour ca qu'elle ne fonctionne pas. Il faut que tu lui demandes qu'il ouvres le fichier test.xls.
0