conflit entre une macro type de macro

J

jasmin

Guest
Bonjour à tous,

j'avais un problème. Le forum m'a donné plusieurs solutions possibles (Hervé, Robert). Qui sont très bonnes mais qui m'ont permis de découvrir un autre problème. le voici :

J'ai écris une macro Macro1() qui permet de prendre des valeurs d'une feuille d'un fichier Excel Fichier_1.xls et de les copier dans la feuille d'un autre fichier Excel Fichier_2.xls
qui fait un calcul et renvoie un résultat. La macro copie ce résultat dans le premier fichier Excel Fichier_1.xls.

La macro Macro1() est du style :

Sub Macro1()
Windows ('Fichier_1.xls).Activate
A = Cells(1,1).Value
Windows ('Fichier_2.xls).Activate
Cells(1,1).Value = A
Resultat = Cells(2,1).Value
Windows ('Fichier_1.xls).Activate
Cells(2,1).Value = Resultat
End Sub

Ca marche très bien.

J'ai créé un bouton CommandButton1()
dont la macro associée est :

Private Sub CommandButton1()
Macro1
End Sub

Ca marche aussi très bien.

Par contre ceci ne marche pas (c a d quand je colle le contenu de Macro1() dans CommandButton1() ):

Private Sub CommandButton1()
Windows ('Fichier_1.xls).Activate
A = Cells(1,1).Value
Windows ('Fichier_2.xls).Activate
Cells(1,1).Value = A
Resultat = Cells(2,1).Value
Windows ('Fichier_1.xls).Activate
Cells(2,1).Value = Resultat
End Sub

Quelqu'un peut -il me dire comment faire ?

La finalité du truc étant de permettre de faire une pause dans la boucle de macro1. La solution est d'agir sur CommandButton à l'intérieur de Macro1


merci beaucoup.

jasmin.
 

Statistiques des forums

Discussions
312 508
Messages
2 089 137
Membres
104 045
dernier inscrit
Megajoules