F
Fabien14
Guest
bonjour
J'ai un probleme avec mes userforum, en effet j'ai 3 userform pour mon application et l'afficage des userforum est lien a des condition c a dire que si dans la ligne c la machine 1 alors afficher userform 1 ainsi de suite ...
mais le probleme c que j'ai fait un bouton precendent et suivant mais quand je click dessus il me met ' erreur d'execution '402' vous devez d'abord fermer ou masquer la feuille modale d premier plan' ... j'ai pourtant masqer par la fonction hide mes userforum mais j'ai toujours le probleme ... voici le code (je ne peu pas vous donner le programme complet c un programme d'entreprise.
Qlq peu t'il m'aider ?
Merci
J'ai un probleme avec mes userforum, en effet j'ai 3 userform pour mon application et l'afficage des userforum est lien a des condition c a dire que si dans la ligne c la machine 1 alors afficher userform 1 ainsi de suite ...
mais le probleme c que j'ai fait un bouton precendent et suivant mais quand je click dessus il me met ' erreur d'execution '402' vous devez d'abord fermer ou masquer la feuille modale d premier plan' ... j'ai pourtant masqer par la fonction hide mes userforum mais j'ai toujours le probleme ... voici le code (je ne peu pas vous donner le programme complet c un programme d'entreprise.
Code:
Private Sub CMDsuivant_Click()
'saut ligne suivant
Dim CurrentRow As Range
Dim machine As Range
FrmTask.Hide
FrmTaskJCEM.Hide
FrmPS.Hide
ActiveCell.Offset(1, 0).Activate
Set CurrentRow = Selection.EntireRow
Set machine = CurrentRow.Cells(1, enColLigne)
If machine.Value = 'machine1' Then
FrmM1.Show 1
FrmM1.Hide
End If
If machine.Value = 'machine2' Then
FrmM2.Show 1
FrmM2.Hide
End If
If machine.Value = 'machine3' Then
FrmM3.Show 1
FrmM3.Hide
End IfQlq peu t'il m'aider ?
Merci