Afficher user Form

Bonjour,

Dans mon fichier, si n'importe quelle cellule de la colonne A est égale à n'importe quelle cellule de la colonne C, j'ai une userform qui s'affiche mais je n'arrive pas à afficher une seconde userform si n'importe quelle cellule de la colonne A n'est pas égale à n'importe quelle cellule de la colonne C.

Je vous mets mon fichier ci-joint.

Merci d'avance

Bonjour Tom

Voici une possibilité

Private Sub Worksheet_Change(ByVal Target As Range)
  Dim CelF
  On Error Resume Next
  If Not Application.Intersect(Target, Range("C:C")) Is Nothing Then
    CelF = Application.WorksheetFunction.Match(Target.Value, Range("A2:A" & Range("A" & Rows.Count).End(xlUp).Row), 0)
    If Not IsEmpty(CelF) Then
      Call Affichage_UserForm
    Else
      Call Affichage_UserForm2
    End If
    Set CelF = Nothing
  End If
  On Error GoTo 0
End Sub

A+

Merci pour votre aide mais le soucis c'est que des que la cellule est vide cela m'affiche la userform moi je veux que quand la cellule n'est pas vide si n'importe quelle cellule de la colonne A n'est pas égale à n'importe quelle cellule de la colonne C on affiche ma seconde userform.

Re

C'est la base de VBA, cours ICI https://www.excel-pratique.com/fr/vba

Il suffit de rajouter un test du contenu de Target

Bonne chance

Excuser mais moi mais cela fait qu'une semaine que j'ai commencé le VBA.

Merci pour votre info

Rechercher des sujets similaires à "afficher user form"