VBA根据不同工作簿中的工作表自动更新一个工作簿中的表
VBA根据不同工作簿中的工作表自动更新一个工作簿中的表
提问于 2016-11-09 02:34:15
大家下午好，
我有两个工作簿，希望Excel根据一个工作表自动更新另一个工作表中的表。我希望工作簿MergetestSheet!2015中的表根据工作簿2015Sheet!1范围A1:p144,031中的表自动更新。有人可以帮助编写VBA代码吗？
谢谢
回答 2
Stack Overflow用户
发布于 2016-11-09 08:31:42
Devin的答案运行良好，但您希望尽可能避免使用.select。我会提出更多类似的建议：
sub Transfer()
Dim copyRangeValues as Long
Dim destinationRange as Range
Workbook("2015.xls").Activate
set copyRangeValues = Worksheet("Sheet1").Range("A1:P144031").Value
Worksheet("Mergetest.xls").Activate
set destinationRange = Worksheet("Sheet1").Range("A1:P144031")
destinationRange.Value = copyRangeValues
End Sub这假设A1:P144031也是第二个工作表中的表格所在的单元格范围。如果不是这样，你需要修改它，或者添加一些计数器变量，使其更加自动化。
Stack Overflow用户
发布于 2016-11-09 04:25:44
您可以随时从一个工作簿复制数据并将其粘贴到另一个工作簿。
如下所示：
Sub Transfer_Data()
Windows("2015").Activate
Range ("A1:P144031").Select
Selection.Copy
Windows("Mergetest").Activate
Range ("A1").Select
ActiveSheet.Paste
End Sub页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/40494089
复制相关文章
相似问题
腾讯云开发者
