如何在 Excel 中通过单击自动将单元格复制到剪贴板？

通常，将单元格复制到剪贴板时，您需要先选择该单元格，然后按 Ctrl + C 键进行复制。如何通过单击单元格而不按快捷键来自动复制呢？本文中的方法可以帮助您实现这一功能。

使用 VBA 代码通过单击自动将单元格复制到剪贴板

使用 VBA 代码通过单击自动将单元格复制到剪贴板

以下 VBA 代码可以帮助您通过单击 Excel 中的单元格将其复制到剪贴板。请按照以下步骤操作：

1. 打开希望自动将单元格复制到剪贴板的工作表，右键单击工作表标签，然后从右键菜单中选择“查看代码”。参见截图：

2. 在打开的 Microsoft Visual Basic for Applications 窗口中，请将 VBA 代码复制到代码窗口中。

VBA 代码：通过单击自动将单元格复制到剪贴板

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("A1:A9")) Is Nothing Then
        Target.Copy
    End If
End Sub

注意：在代码中，A1:A9 是您要自动复制到剪贴板的单元格区域。请根据您的需求进行更改。

3. 按 Alt + Q 键关闭 Microsoft Visual Basic for Applications 窗口。

当单击 A1:A9 区域中的任意单元格时，该单元格会自动复制到剪贴板，如下图所示。

然后，您可以选择目标单元格并按 Enter 键粘贴已复制的内容。

相关文章：

• 如何在 Excel 中复制包含行高和列宽的单元格数据？
• 如何在当前工作表或从一个工作表到另一个工作表中自动复制和粘贴单元格？
• 如何在 Excel 中禁用剪切、复制和粘贴功能？
• 如何在 Excel 中仅复制选定区域的边框？