Excel VBA宏，复制行中的第一个值

Question

我想写一个宏，它将复制我选择的单元格的同一行的列A中的值。

因此，举例来说，如果我的电子表格看起来像：

| John | Doe | 123 | 456 | Apples | 

以及选择小区是含有123一个，它会复制约翰。如果我选择了456单元格，它仍然会复制约翰。合理？

我明白Selection.Offset(,-3).Copy函数（会将单元格的三列复制回来，与当前选择的行相同），但我不是每次都在同一列中启动，所以我认为我需要更明确的引用。

感谢您的帮助！

Answer 1

在Worksheet_SelectionChange事件的相关表的下方添加代码：

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