Macro à l'ouverture
Résolu/Fermé
jc80
Messages postés
4149
Date d'inscription
mardi 5 février 2013
Statut
Membre
Dernière intervention
25 février 2019
-
Modifié par jc80 le 12/10/2015 à 19:07
jc80 Messages postés 4149 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 - 14 oct. 2015 à 10:05
jc80 Messages postés 4149 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 - 14 oct. 2015 à 10:05
A voir également:
- Macro à l'ouverture
- Macro logiciel - Télécharger - Organisation
- Macro recorder - Télécharger - Confidentialité
- Macro Recorder - Télécharger - Divers Utilitaires
- Macro word - Guide
- Macro souris ✓ - Forum Windows
3 réponses
gbinforme
Messages postés
14939
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 656
12 oct. 2015 à 21:35
12 oct. 2015 à 21:35
Bonjour,
Il faut l'appeler dans "Workbook_Open" de ThisWorkbook et faire en sorte que son code soit compatible.
Il faut l'appeler dans "Workbook_Open" de ThisWorkbook et faire en sorte que son code soit compatible.
jc80
Messages postés
4149
Date d'inscription
mardi 5 février 2013
Statut
Membre
Dernière intervention
25 février 2019
1 437
13 oct. 2015 à 12:05
13 oct. 2015 à 12:05
Bonjour
Merci pour ton aide
ci-dessous ma macro que je n'arrive pas a démarrer automatiquement.
elle se trouve en feuil2 de mon fichier
Si tu peux me résoudre ce problème.
Sub tri_plage()
'
' tri_plage Macro
Application.Goto Reference:="plage"
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
Cordialement
Merci pour ton aide
ci-dessous ma macro que je n'arrive pas a démarrer automatiquement.
elle se trouve en feuil2 de mon fichier
Si tu peux me résoudre ce problème.
Sub tri_plage()
'
' tri_plage Macro
Application.Goto Reference:="plage"
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
Cordialement
PlacageGranby
Messages postés
393
Date d'inscription
mercredi 26 mars 2014
Statut
Membre
Dernière intervention
7 mars 2019
26
13 oct. 2015 à 17:49
13 oct. 2015 à 17:49
Bonjour,
En théorie, gbinforme t'as donné toute l'information nécessaire donc il faut seulement suivre ses indications.
Si tu ne sais pas ou trouver "Workbook_Open" de ThisWorkbook, alors regarde le lien suivant :
https://silkyroad.developpez.com/VBA/EvenementsClasseur/
Il y a des illustration pour trouver ou est ce Workbook_open.
Tu peux appeler tri_plage() à cet endroit.
Donc ca va donner
Il y a beaucoup de tutoriel sur developpez.com pour ceux qui commence a programmer en VBA.
En théorie, gbinforme t'as donné toute l'information nécessaire donc il faut seulement suivre ses indications.
Si tu ne sais pas ou trouver "Workbook_Open" de ThisWorkbook, alors regarde le lien suivant :
https://silkyroad.developpez.com/VBA/EvenementsClasseur/
Il y a des illustration pour trouver ou est ce Workbook_open.
Tu peux appeler tri_plage() à cet endroit.
Donc ca va donner
Private Sub Workbook_open()
tri_plage()
End Sub
Il y a beaucoup de tutoriel sur developpez.com pour ceux qui commence a programmer en VBA.
jc80
Messages postés
4149
Date d'inscription
mardi 5 février 2013
Statut
Membre
Dernière intervention
25 février 2019
1 437
13 oct. 2015 à 18:21
13 oct. 2015 à 18:21
Merci pour ta réponse
j'ai bien trouvé Workbook_open()
j'ai mis mon nom de macro
j'ai la réponse suivante>>>
erreur de compilation
Attendu:=
là je suis coincé.
j'ai bien trouvé Workbook_open()
j'ai mis mon nom de macro
j'ai la réponse suivante>>>
erreur de compilation
Attendu:=
là je suis coincé.
gbinforme
Messages postés
14939
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 656
13 oct. 2015 à 18:30
13 oct. 2015 à 18:30
Bonsoir,
Comme ceci
ou
Comme ceci
Private Sub Workbook_open()
Call tri_plage()
End Sub
ou
Private Sub Workbook_open()
' tri_plage Macro
Application.Goto Reference:="plage"
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
jc80
Messages postés
4149
Date d'inscription
mardi 5 février 2013
Statut
Membre
Dernière intervention
25 février 2019
1 437
>
gbinforme
Messages postés
14939
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
14 oct. 2015 à 10:05
14 oct. 2015 à 10:05
Bonjour gbinforme
Merci pour ton aide
La 2°solution est la bonne
Cordialement
Merci pour ton aide
La 2°solution est la bonne
Cordialement