If userform then

bon jour a tout et a tous

j'ai un problème de puis presque une semaine quelqu'un peut m'aider SLP

Private Sub Workbook_Open()

Dim a As Integer

UserForm1.Show

Userform2.Show

If Userform2.Show Then

MsgBox "bon jour"

End If

End Sub

quelqu'un peut corrigé ce code SLP

merci d'avance

-- Dim Déc 12, 2010 12:29 pm --

juste deux remarque

1er: il n y a pas le ligne du "Dim a as integr"

2éme: l'erreur c'est Type incompatible (erreur 13)

merci d'avance

Bonjour idrissi528

la méthode pour vérifier si l'userform est affiché à l'écran serait du genre

if userform2.visible= true then

je ne connais pas le sujet mais il me semble que la macro workbook open que tu présente ne fonctionne pas si les userform sont en mode modal car le premier userform s'affiche mais le reste non

c'est ca ce que je cherche merci ^^