Message box

[ascal44]

Bonsoir, je vous réclame votre aide par ce que lorsque que je clique sur ce MSG :

If TextBox4 = "" Then
    MsgBox "Pas de somme inscrite" & vbCrLf & " Veuillez renseigner le prix ", vbInformation + vbOKOnly
End If

L'userform de saisie valide les entrées , je voudrais bloquer cette saisie et mettre le curseur dans le Textbox4 pour obliger la saisie d'un prix.

J'espère être clair dans mes explications.

 

[kjin]

Re : Message box

bonsoir,

If textbox4 = "" Then
    MsgBox "Pas de somme inscrite" & vbCrLf & " Veuillez renseigner le prix ", _
            vbInformation + vbOKOnly
    textbox4.SetFocus
    Exit Sub
End If

a+
kjin

 

[ascal44]

Re : Message box

Merci Kjin pour votre rapidité , vous m'avez bien compris cela fonctionne