在EXCEL之间复制数据所需的公式
我需要将型号代码从工作簿1复制到工作簿2。当我在workbook1中键入模型代码时,它应自动复制到workbook2中。请协助我如何完成此操作。如果您的目标工作簿已打开,则以下操作应有效。您应该定义数据复制到的工作表(此处为“Sheet1”)在EXCEL之间复制数据所需的公式,excel,vba,Excel,Vba,我需要将型号代码从工作簿1复制到工作簿2。当我在workbook1中键入模型代码时,它应自动复制到workbook2中。请协助我如何完成此操作。如果您的目标工作簿已打开,则以下操作应有效。您应该定义数据复制到的工作表(此处为“Sheet1”) 使用工作表\u更改事件。在web上搜索类似“单元格更改时excel vba”和“excel vba将范围复制到其他工作表”或类似内容。否则,请显示您的代码,以便这里的人可以帮助您。以下是我使用的代码:子复制()工作簿(“Prod”)。激活范围(“A:B”)
使用
工作表\u更改事件。在web上搜索类似“单元格更改时excel vba”和“excel vba将范围复制到其他工作表”或类似内容。否则,请显示您的代码,以便这里的人可以帮助您。以下是我使用的代码:子复制()工作簿(“Prod”)。激活范围(“A:B”)。选择选项。复制工作簿(“newexcel”)。激活范围(“A1”)。粘贴特殊结束子
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Destination As Range
Set Destination = Workbooks("newexcel.xls").Worksheets("Sheet1").Range(Target.Address)
Destination.Value = Target
End Sub