比如要复制到第一张表A1单元格：按Alt+F11打开VBE编辑器，在Thisworkbook代码窗口输入如下代码：Private Sub Workbook_SheetSelectionChange(ByVal Target As Range)Target.range("A1").Copy Sheet1.Range("a1")End Sub这样就可以了，无论选择多少，只复制选区中第一个单元格的内容。
