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.