bonjour à tous
avec le code ci-dessous je propose dans un messagebox une option oui/non
je voudrais transformer cette option par oui uniquement puis ouvrir l'userform2
j'ai fais un essais en enlevant le No et/ou le vbQuestion mais sans succès
Merci de votre aide
Kinel
Message = MsgBox("votre password arrive à expiration" & vbCrLf & _
"Vous devez changer ! ", vbQuestion + vbYesNo, T)
If Message = vbYes Then
With UserForm2
.LblUser = User
.LblCell.Caption = Rech.Offset(0, 1).Address
.Show
End With
End If
avec le code ci-dessous je propose dans un messagebox une option oui/non
je voudrais transformer cette option par oui uniquement puis ouvrir l'userform2
j'ai fais un essais en enlevant le No et/ou le vbQuestion mais sans succès
Merci de votre aide
Kinel
Message = MsgBox("votre password arrive à expiration" & vbCrLf & _
"Vous devez changer ! ", vbQuestion + vbYesNo, T)
If Message = vbYes Then
With UserForm2
.LblUser = User
.LblCell.Caption = Rech.Offset(0, 1).Address
.Show
End With
End If