Ajouter message d'erreur

bonsoir le forum

avec le code d impression(code du userform2)

si on marque une référence "600"par exemple dans le userform qui n'est pas dans ma base(feuille base masquer)comme reference

je voudrais avoir un message du style référence non valide

qui me signal que cette ref n'est pas dans la base de donné

voir fichier joint

A+

Cordialement.

aiglon74

Bonsoir

Rajoutes au début de la macro

Private Sub CmbValider_Click()
'aiglon74
  If Application.CountIf(Sheets("Base").Range("C7:C" & Rows.Count), Me.TextBox1) = 0 Then
    MsgBox "Référence inconnue"
    Exit Sub
  End If
  Unload Me
  Application.ScreenUpdating = False

  If TextBox1 = "" Then

bonjour Banzai64

merci pour cette solution

qui fonctionne super

A+

aiglon74

Rechercher des sujets similaires à "ajouter message erreur"