Macro qui execute tous les boutons d'un formulaire

Fermé
van_van Messages postés 60 Date d'inscription mercredi 6 avril 2016 Statut Membre Dernière intervention 9 janvier 2017 - 20 avril 2016 à 11:15
van_van Messages postés 60 Date d'inscription mercredi 6 avril 2016 Statut Membre Dernière intervention 9 janvier 2017 - 20 avril 2016 à 17:15
Bonjour tout le monde alors voila, j'ai crée un formulaire avec plusieurs boutons, et j'aimerais que les personnes qui executent les différents boutons du formulaire ne fasse pas n'importe quoi! de facon a ce que l'analyse soit ctoujours correct et qu'il y ait pas de défaillance dans le systeme.

Serait il possible de crée une macro qui permet d'executer tous les boutons dans l'ordre que je veux et en un seul coup sans que personne ne touche quoi que ce soit.

Je vous remercie d'avance
A voir également:

3 réponses

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
20 avril 2016 à 11:28
Bonjour,

C'est possible, mais... Quel est l'intérêt?
Ne met qu'un seul bouton réalisant toutes tes actions dans l'ordre...
0
van_van Messages postés 60 Date d'inscription mercredi 6 avril 2016 Statut Membre Dernière intervention 9 janvier 2017
20 avril 2016 à 11:30
oui mais comme a chaque fois il y'a des nouvelles variables et que des fois les codes commences par "option...." cela ne va pas faire beuguer ?
0
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744 > van_van Messages postés 60 Date d'inscription mercredi 6 avril 2016 Statut Membre Dernière intervention 9 janvier 2017
20 avril 2016 à 11:32
Honnêtement, comment veux tu que je réponde à cette question sans le code et/ou le classeur?
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
20 avril 2016 à 11:32
Bonjour,

Vous mettez tous les boutons sauf le premier en .Enabled = False a l'ouverture de votre UF et vous mettez le bouton qui doit etre actif
(.Enabled = true) a la fin de l'execution du code du bouton actif

exemple:
Private Sub UserForm_Initialize()
    CommandButton1.Enabled = True
    CommandButton2.Enabled = False
    ' et ainsi de suite
End Sub

Private Sub CommandButton1_Click()
    'code a exceuter
    '
    '
    CommandButton2.Enabled = True   'active le  bouton suvant
    CommandButton1.Enabled = False  'desactive le bouton precedent
End Sub
0
Lils_Bis Messages postés 57 Date d'inscription lundi 4 avril 2016 Statut Membre Dernière intervention 28 décembre 2020
Modifié par Lils_Bis le 20/04/2016 à 11:39
(re)Bonjour van_van,
J'ai le même problème que toi. Pour y remédier j'ai :

1- Créer un module et insérer mes macros dedans


Option Explicit

Dim X As Integer, Y As Long

Sub Mac1()
.
.
.
End Sub
Private Sub Mac(k As Long)
.
.
.
.

End Sub


Private Sub Maccc(k As Long)
.
.
.
.
End Sub


Sub Mac2()
.
.
.
End Sub





2- De là j'ai créer un bouton "Ana_Mac" dans mon userform

3- Dans ce bouton, j'ai écris le code suivant :
Private Sub Ana_Mac_Click()
'Lancer le module 3 (Mac1)
Module3.Mac1
'Lancer le module 3 (Mac2)
Module3.Mac2
End Sub



J'espère que cela t'aidera dans ton problème, bon courage.
0
van_van Messages postés 60 Date d'inscription mercredi 6 avril 2016 Statut Membre Dernière intervention 9 janvier 2017
20 avril 2016 à 11:47
Merci a tous les deux, Je te remercie lilian et n'oublie surtout pas JE T AIME ! ET JE T AIMERAI
0
van_van Messages postés 60 Date d'inscription mercredi 6 avril 2016 Statut Membre Dernière intervention 9 janvier 2017
20 avril 2016 à 13:18
ta methode ne marche pas lilian pas avec moi en tout cas
0
van_van Messages postés 60 Date d'inscription mercredi 6 avril 2016 Statut Membre Dernière intervention 9 janvier 2017
20 avril 2016 à 13:21
AH si !
0
Lils_Bis Messages postés 57 Date d'inscription lundi 4 avril 2016 Statut Membre Dernière intervention 28 décembre 2020 > van_van Messages postés 60 Date d'inscription mercredi 6 avril 2016 Statut Membre Dernière intervention 9 janvier 2017
Modifié par Lils_Bis le 20/04/2016 à 13:49
Je suis content qu'elle marche, bon courage pour la suite van_van...
0
van_van Messages postés 60 Date d'inscription mercredi 6 avril 2016 Statut Membre Dernière intervention 9 janvier 2017 > Lils_Bis Messages postés 57 Date d'inscription lundi 4 avril 2016 Statut Membre Dernière intervention 28 décembre 2020
20 avril 2016 à 17:15
Merci Ma petite crotte <3
0