Bonjour
J'ai écrit un petit code sous VBA qui tourne sans problème depuis quelques mois maintenant. Pour plus de lisibilité, j'ai créé des onglets dans le formulaire en multipages. J'ai déplacé les frames dans divers onglets, sauf les boutons tels que 'Quitter', 'Suivant', 'Annuler', 'Modifier' que j'ai laissé dans le formulaire ....
Le formulaire s'appelle 'FA'.
Depuis cette modification, j'ai une erreur au lancement de ma routine.
J'ai reporté l'erreur dans le code ci dessous. J'imagine bien que le multipage est en cause, mais je ne sais comment résoudre le problème.
Merci pour votre aide
Frédéric
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
Sub Creation()
    'Ouverture la fenêtre contenant le formulaire d'ajout d'une FA
 
    ReSecteur = False
    Ajout = True
    Modif = False
    suivant = False
    precedent = False
    ClotureQ = False
    ClotureT = False
    Libre = True
 
    FA.CmdModifier.Visible = False ===>> L'incide n'appartient pas à la sélection
   FA.CmdQualité.Visible = False
    FA.Frame17.Visible = False 'frame recherche
   FA.FrmFA.Visible = False 'frame NumFA
   FA.CmdSuivant.Visible = False
    FA.CmdPrecedent.Visible = False
 
    FA.Show
 
End Sub