Discussion :

[fyejumpy]

Bonjour,

Mon problème est assez simple je veux afficher dans une textbox d'un Userform les coordonnées de ma cellule.
Cette cellule est sélectionnée directement dans l'onglet du fichier excel.

j'ai donc tenté avec ActiveCell, ActiveCell.row/column. Mais rien ne fonctionne.

Pouvez vous m'aider ?

Cordialement.

[joe.levrai]

Bonjour,

utiliser la propriété Address

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Me.TextBox1 = Activecell.Address

[fyejumpy]

Bonjour merci de m'avoir répondu.

Mais malheureusement cela ne fonctionne pas.

je vais reformuler peut être me suis-je mal fais comprendre.
Je voudrais que quand je clique sur une cellule de mon fichier excel (flèche noir), ses coordonnées ou son adresse aillent dans la textbox (flêche rouge).



Merci de bien vouloir m'aider,

Cordialement.

Ps : Voici le code que j'utilise :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub CellActive_Change()
 CellActive = ActiveCell.Address.Select
End Sub

[joe.levrai]

Bonjour,

dans ce cas, tu copies ce code dans le module de la feuille concernée
ton userform ne doit pas être modal bien entendu

il faut changer le nom de Userform1 pour mettre le tient, et éventuellement le nom de ton textbox

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 
UserForm1.TextBox1 = Target.Address
 
End Sub

et si tu veux également faire figurer la feuille :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
UserForm1.TextBox1 = Target.Parent.Name & "!" & Target.Address

[Philippe Tulliez]

Bonjour,
Il y a aussi le Contrôle RefEdit qui peut donner la référence à une cellule ou à une plage de cellules.
C'est un contrôle qu'il faut ajouter. Clic droit sur la barre d'outils des contrôles, sélectionner contrôles supplémentaires... et cocher RefEditCtrl

[fyejumpy]

Merci bien cela fonctionne parfaitement !

Je passe en résolu !

Cordialement,

Fyejumpy