Ouverture userform suivant valeur cellule
Bonjour,
Je débute en Vba, avec les différents forum j'arrive à y voir plus clair mais là, je bloque sur un point.
Je souhaiterai faire apparaître un userform uniquement suivant la valeur d'une cellule que complète l'opérateur.
Exemple: si la cellule A1 vaut W on affiche sinon on affiche pas.
Merci d'avance,
Je débute en Vba, avec les différents forum j'arrive à y voir plus clair mais là, je bloque sur un point.
Je souhaiterai faire apparaître un userform uniquement suivant la valeur d'une cellule que complète l'opérateur.
Exemple: si la cellule A1 vaut W on affiche sinon on affiche pas.
Merci d'avance,
1 réponse
-
Bonjour,
code a mettre dans VBA dela feuille de saisie A1: (changer le nom de la forme)
A1=w ou W-------->Userform s'affiche
A1<>w ou W ----->Userform s'efface
Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("A1")) Is Nothing And Target.Count = 1 Then If UCase(Target) = "W" Then UserForm1.Show vbModeless Else UserForm1.Hide End If End If End Sub
Bonne suite
