protection d'une plage de donnée

gege · 24 Mai 2005

bonjours
voici un extrai du programme recupere sur ce site
'Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Address() = '$G$12' Or ActiveCell.Address() = '$G$14' Then
UserFormPass.Show
End If
End Sub'
mon probleme est que je veux lancer mon userform non pas lorsque l'on clique sur une cellule precise comme ici g12 ou g14 mais plutot sur une plage de donnée comme a1:b45
si quelqu'un a une solution je l'en remercie

Eric C · 24 Mai 2005

Bonjour le forum
Bonjour gégé

Essayes le code ci-dessous :

Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range('A1:B45')) Is Nothing Then
UserFormPass.Show
End If
End Sub

protection d'une plage de donnée

gege

Guest

Eric C

XLDnaute Barbatruc

Discussions similaires