Définir la cellule dans laquel on vien d'écrire

[flo2002]

Re bonjour à tous,

je cherche à dire en Vba la cellule dans la quel je viens d'écrire qui appartiens à la plage de donnée X

comment on dit ca en Vba svp?


Merci de vos lumieres!

 

[JeanMarie]

Bonjour

Je ne sais pas si cela t'aider.

Sans condition de plage

Private Sub Worksheet_Change(ByVal Target As Range)
   mgsbox Target.Address
End Sub

Dans la plage A1:A100

Private Sub Worksheet_Change(ByVal Target As Range)
   If Application.Intersect(Target, Range('A1:A100')) Is Nothing Then Else MsgBox Target.Address
End Sub

@+Jean-Marie

 

[Gorfael]

Salut
Brut de fonderie, une solution

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Str_msg As String
Dim Plag_Test As Range

Set Plag_Test = Range('A1:B8')
If Not Intersect(Target, Plag_Test) Is Nothing Then
Str_msg = Target.Address(RowAbsolute:=False, columnAbsolute:=False)
End If

End Sub
essaies ça sur le module de classe d'une feuille
Si tu modifies une valeur dans la plage A1:B8,
la variable str_msg = adresse de la cellule modifiée
Mets un point d'arrête sur la macro pour visualiser son fonctionnement.

 

[Gorfael]

Salut JeanMarie

Crotte, flûte, zut, encore trop lent... mais je reviendrais et ma réponse sera plus rapide 🙂
A+

 

[andré]

Salut Gorfael,

Pourquoi ne fais-tu par référence à la pub de MAAF ; 'Un jour je l'aurai !' (lol)

Cela devient presqu'un classique !

Â+

 

[flo2002]

Merci encore une fois je vais tester ca!

 

[Gorfael]

andré écrit:

Salut Gorfael,

Pourquoi ne fais-tu par référence à la pub de MAAF ; 'Un jour je l'aurai !' (lol)

Cela devient presqu'un classique !

Â+

Salut
Justement, je n'aime pas être 'classique'
A+