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

椅子保姆

我正在尝试编写一个宏,该宏将复制所选单元格同一行的A列中的值。

例如,如果我的电子表格如下所示:

| John | Doe | 123 | 456 | Apples |

并且所选单元格是包含123的单元格,它将复制John。如果我选择456单元格,它将仍然复制John。有道理?

我了解Selection.Offset( ,-3).Copy函数(会将单元格复制回三列,与当前选择相同的行),但是我并不是每次都从同一列开始,所以我认为我需要一个更独特的引用。

谢谢您的帮助!

Shai Rado

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

本文收集自互联网,转载请注明来源。

如有侵权,请联系 [email protected] 删除。

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章

如何从VBA(Excel)中的字符串中提取第一个单词?

Excel宏:根据条件将行值从一个工作表复制到另一工作表中的特定位置

Excel:从表中获取第一个值

Excel VBA行中的第一个非空单元格

excel vba宏:将特定的列复制并粘贴到另一个工作簿中

获取Excel表中第一个单元格的行和列号

Excel VBA-For Loop需要跳过Web Scrape中的第一个元素

Excel VBA一次复制选定的工作表,但随后仅再次复制第一个工作表

Excel VBA代码可在第一个单元格的值更改时复制一行中的单元格区域并粘贴到不同的工作表中,但行/范围相同

如何在Excel数组公式中获取第一个TRUE值

Excel公式获取行中的第一个和最后一个非空值并返回列标题

Excel 2007复制范围值并粘贴到另一个范围(同一张纸)的第一个空行

Excel VBA向下复制单元格列表,反复删除第一个元素并重复最后一个元素

使用Excel宏VBA将Word文档中的第一个表复制到Excel

Excel VBA:如何在表的最后一行的第一个单元格中粘贴一个值?

Excel公式仅使用另一个工作表上的列中的第一个值

Excel:在第2列当前值中查找第一个值

Excel 2016在excel VBA中重复出现的第一个字符后复制所有内容

Excel VBA宏将多个excel中使用的单元格复制到一个excel中

Excel:获取行中第一个和最后一个非零单元格的位置

Excel:在表格中查找匹配单元格并返回行中第一个单元格的值

VBA Excel - 更改确定范围内行的每个第一个值的颜色

Excel VBA 宏 - 在第一个单元格中查找文本,替换相邻单元格中的值

问:从excel中的第一个非空值开始一行

打印数组只会导致第一个值被打印到 excel 中?

Excel 中的 VBA 中的代码是什么,它将选择宏最初启动的第一个单元格?

如何在Excel VBA中为目标查找同一行的第一个单元格的值?

如何使用VBA获取跳过Excel中第一个区域的区域中的所有行

如何在excel中获得第一个非空/空值