Worksheet_change Zone Spécifique

[F2T]

Bonjour ou Bonsoir Meme 🙂🙂

quelqu'un serait il si il est possible de focaliser un worksheet change sur
une colone precise.

C'est a dire que si un element de la colone change.
Un evenement est généré.

Merci pour l'aide

++😱

 

[kjin]

Re : Worksheet_change Zone Spécifique

bonsoir,
affichage du message uniquement si le changement intervient en colonne 2

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 2 Then Exit Sub
MsgBox "c'est la colonne 2"

End Sub

A+
kjin

 

[ERIC S]

Re : Worksheet_change Zone Spécifique

Bonsoir

en début de macro tu testes la colonne :

if not target.column = XXX then exit sub


ou avec intersect...

toujours plus rapide Kjin

 

[ROGER2327]

Re : Worksheet_change Zone Spécifique

Bonsoir F2T

Essayez une structure du genre :

[COLOR="DarkSlateGray"][B]Private Sub Worksheet_Change(ByVal Target As Range)
Dim oPlg
   Set oPlg = Intersect(Target, Column(3))
   If Not oPlg Is Nothing Then
      [COLOR="SeaGreen"]'Code à exécuter lorsque Target contient une ou
      'des cellules de la colonne 3.[/COLOR]
   End If
End Sub[/B][/COLOR]

ROGER2327
#3982

Lundi 16 Tatane 137 (Transfig. de Saint Vincent van Gogh, transmutateur, SQ)
11 Thermidor An CCXVIII
2010-W30-4T20:34:12Z

 

[F2T]

Re : Worksheet_change Zone Spécifique

Merci Messieurs

Je regarderais ca demain car la je suis over 🙂🙂.

Merci ++++