T
thierry
Guest
bah oui, je n'arrive pas à fermer ma boite de dialogue quand je clique sur 'ok', voici la macro assigné au bouton ok..
Private Sub Valider_Click()
If IsEmpty(Sheets('source').Range('E7').Value) = True Then
réponse = MsgBox('Vous devez choisir l'orientation et l'inclinaison des panneaux avant de continuer', vbOKOnly + vbInformation, 'Précisez votre recherche')
Else:unload combobox1
'End If
End Sub
à cause du 'else:unload combobox1' j'ai un message d'erreur qui saffiche...pkoi???
:ermm:
Merci de m'aider...
:unsure:
Private Sub Valider_Click()
If IsEmpty(Sheets('source').Range('E7').Value) = True Then
réponse = MsgBox('Vous devez choisir l'orientation et l'inclinaison des panneaux avant de continuer', vbOKOnly + vbInformation, 'Précisez votre recherche')
Else:unload combobox1
'End If
End Sub
à cause du 'else:unload combobox1' j'ai un message d'erreur qui saffiche...pkoi???
:ermm:
Merci de m'aider...
:unsure: