Ouverture userform suivant valeur cellule

Fermé
débutant - 19 juil. 2013 à 15:05
 débutant - 19 juil. 2013 à 16:34
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,

1 réponse

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
19 juil. 2013 à 15:42
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
0
Merci!
0
Merci!
0
Merci pour ta rapidité! Bon après midi!
0