conflit entre une macro type de macro

  • Initiateur de la discussion Initiateur de la discussion jasmin
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

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.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
Microsoft 365 Code VBA
Réponses
10
Affichages
1 K
Réponses
3
Affichages
253
Réponses
7
Affichages
173
Réponses
5
Affichages
907
  • Question Question
XL 2021 VBA excel
Réponses
4
Affichages
449
Réponses
4
Affichages
730
Réponses
1
Affichages
323
Retour