ouverture userform suivant valeur cellule

Question

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, 

Configuration: iPhone / Chrome 25.0.1364.169

f894009 · Answer

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

Ouverture userform suivant valeur cellule

1 réponse

Discussions similaires

Newsletters