Excel VBA-Makro, kopieren Sie den ersten Wert in Zeile

Question

Ich versuche, ein Makro zu schreiben, die den Wert in Spalte A der gleichen Zeile der Zelle, die ich ausgewählt habe, kopieren wird.

So zum Beispiel, wenn meine Tabelle sah aus wie:

| John | Doe | 123 | 456 | Apples | 

und die ausgewählte Zelle war die ein 123 enthält, wäre es John zu kopieren. Wenn ich die Zelle 456 auswählte, würde sie immer noch John kopieren. Sinn ergeben?

Ich verstehe die Selection.Offset(,-3).Copy Funktion (würde die Zelle drei Spalten zurück, gleiche Zeile wie aktuelle Auswahl kopieren), aber ich fange nicht immer in der gleichen Spalte, so denke ich, ich brauche eine eindeutigere Referenzen.

Danke für die Hilfe!

Answer 1

den Code unten in der Worksheet_SelectionChange Veranstaltung Ihres relevanten Blatt hinzufügen:

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 

' copy the cell in Column "A" of the same row clicked 
Range("A" & Target.Row).Copy 

End Sub