vba，可以实现不打开工作簿复制吗？

答案:2 悬赏:30 手机版

解决时间 2021-03-16 10:35

提问者网友：沉默菋噵
2021-03-15 20:01

vba，可以实现不打开工作簿复制吗？比如，A工作簿是打开的；B工作簿是没打开的。我现在要从A工作簿的某些单元格内容复制到B工作簿怎么实现？

最佳答案

五星知识达人网友：杯酒困英雄
2021-03-15 21:20

复制内容必须打开，不过既然是VBA来写，可以让VBA打开文件、复制内容、然后关闭文件，例如：
set wb=workbooks.open("b.xlsx")
workbooks("a.xlsx").sheets("sheet1").range("a1")=wb.sheets("sheet1").range("a1")
wb.close

全部回答

1楼网友：千杯敬自由
2021-03-15 22:26

直接打开这个工作表，用c+w1内容命名，另存为表格就可以了。代码如下： sub change_the_filename() dim filename as string if len(thisworkbook.path) = 3 then filepath = thisworkbook.path & "c0000.xls" else filepath = thisworkbook.path & "\" & "c0000.xls" end if workbooks.open filepath filename = "\c" & range("w1") & ".xls" activeworkbook.saveas filename:=thisworkbook.path & filename activewindow.close end sub

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息