Vba 单击特定单元格时,如何将一个单元格的信息复制到另一个工作表上的单元格?

Vba 单击特定单元格时,如何将一个单元格的信息复制到另一个工作表上的单元格?,vba,excel,Vba,Excel,我一直在尝试创建一个VBA宏,当我在excel中单击某个单元格时,另一个工作表上的信息可以复制到指定的单元格中 例如,如果我单击工作表T1中的A1,那么工作表T3中的B20:C20将复制到工作表T2的B20:C20。有人能帮我创建这个宏吗?请尝试按照下面的示例进行操作: Private Sub CommandButton1_Click() Dim ws As Worksheet, ws1 As Worksheet Set ws = Sheets("KeyInformation")

我一直在尝试创建一个VBA宏,当我在excel中单击某个单元格时,另一个工作表上的信息可以复制到指定的单元格中


例如,如果我单击工作表T1中的A1,那么工作表T3中的B20:C20将复制到工作表T2的B20:C20。有人能帮我创建这个宏吗?

请尝试按照下面的示例进行操作:

Private Sub CommandButton1_Click()
    Dim ws As Worksheet, ws1 As Worksheet
    Set ws = Sheets("KeyInformation")
    Set ws1 = Sheets("Factsheet")
    ws.Range("A2:Q2").Copy
    ws1.Range("B9").PasteSpecial Paste:=xlPasteAll, Transpose:=True
    Application.CutCopyMode = False
    ws1.Activate
End Sub

查看事件使用工作表选择更改事件也许这篇文章可以帮助您开始:谢谢。我稍微改变了一下,它开始工作了。