Automatiser une macro
jad73
Messages postés
29
Date d'inscription
Statut
Membre
Dernière intervention
-
jad73 Messages postés 29 Date d'inscription Statut Membre Dernière intervention -
jad73 Messages postés 29 Date d'inscription Statut Membre Dernière intervention -
Bonjour le forum
J'ai fait une macro (Macro1) qui execute 6 autres macros(Macro2, Go, Macro11, Macro15, Raz, et Macro6 qui termine).
Lorsque ces macros sont terminées je dois recliquer chaque fois sur macro1 pour executer le cycles, tant qu'il y a des données dans la feuil "Tirages".
Je voudrais pouvoir ne plus cliquer chaque fois sur la macro1, du moins le faire une fois jusqu'a épuisement des données de la feuil "Tirages".
Comment faut-il modifier la macro.
Merci
Voici le lien pour le fichier
Mon fichier ne passe pas par cjoint il fait 31900Ko, comment faut-il faire
J'ai fait une macro (Macro1) qui execute 6 autres macros(Macro2, Go, Macro11, Macro15, Raz, et Macro6 qui termine).
Lorsque ces macros sont terminées je dois recliquer chaque fois sur macro1 pour executer le cycles, tant qu'il y a des données dans la feuil "Tirages".
Je voudrais pouvoir ne plus cliquer chaque fois sur la macro1, du moins le faire une fois jusqu'a épuisement des données de la feuil "Tirages".
Comment faut-il modifier la macro.
Merci
Voici le lien pour le fichier
Mon fichier ne passe pas par cjoint il fait 31900Ko, comment faut-il faire
Configuration: Windows / Firefox 72.0
A voir également:
- Automatiser une macro
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Macro maker - Télécharger - Divers Utilitaires
- Macro word - Guide
3 réponses
Bonjour,
Tu cherches la dernière ligne de ta feuille "Tirages"
Ensuite tu mets au début de ta macro 6:
en fin de macro 6 tu lances ta macro 1
Tu cherches la dernière ligne de ta feuille "Tirages"
Ensuite tu mets au début de ta macro 6:
If ligne = derniére ligne Then Exit Sub
en fin de macro 6 tu lances ta macro 1
Bonjour Le Pivert
Voici la macro6, est-ce correct car j'ai un message " pas assez de N° en ligne A "
Merci
Voici la macro6, est-ce correct car j'ai un message " pas assez de N° en ligne A "
Sub Macro6()
'
' Macro6 Macro
'
Sheets("Tirages").Select
If ligne = 20 Then Exit Sub
Range("A2:T4000").Select
Application.CutCopyMode = False
Selection.Copy
Range("A1").Select
ActiveSheet.Paste
Range("A1").Select
Sheets("combi").Select
Range("A18").Select
Call Macro1
End Sub
Merci
Pour trouver la dernière ligne voir ceci:
https://vbaforexcel.wordpress.com/2013/08/31/determiner-la-derniere-lignecolonne-dun-tableau/
Lorsque ces macros sont terminées je dois recliquer chaque fois sur macro1 pour executer le cycles, tant qu'il y a des données dans la feuil "Tirages".
il faut donc trouver la ligne sur laquelle s'arrête ta macro. Quand tu arrives sur la dernière ligne ta macro s'arrête
Voilà
@+ Le Pivert
https://vbaforexcel.wordpress.com/2013/08/31/determiner-la-derniere-lignecolonne-dun-tableau/
Lorsque ces macros sont terminées je dois recliquer chaque fois sur macro1 pour executer le cycles, tant qu'il y a des données dans la feuil "Tirages".
il faut donc trouver la ligne sur laquelle s'arrête ta macro. Quand tu arrives sur la dernière ligne ta macro s'arrête
Dim ligne as Long'trouver la ligne où s'arrête la macro Dim derligne As Long'trouver la dernière ligne de la feuille If ligne = derligne Then Exit Sub
Voilà
@+ Le Pivert