Excel-将一张纸复制到所有打开的工作簿

Question

我试图将一张工作簿中的一张纸复制到所有打开的工作簿中。

我要将工作表复制到的工作簿位于许多不同的文件夹中，但是我计划将它们全部找到并全部打开。

使用Excel 2010，我可以为每个打开的工作簿手动执行此操作，右键单击工作表-移动或复制-选择一个打开的工作簿...我要完成的工作等同于选择所有打开的工作簿。可以将复制的纸张放置在现有纸张的末尾。

我要复制到其他工作簿的工作表包含指向同一工作簿中其他工作表的链接，但是该工作表将被复制到的其他工作簿已经具有相同名称的工作表了，所以这可能不是问题吗？

谢谢！

Answer 1

找到了解决方案： 此宏将活动工作表复制到所有打开的工作簿中，但不在其中：

将wb视作工作簿 昏暗工作表

Set sh = ActiveSheet

For Each wb In Application.Workbooks
    If Not sh.Parent Is wb Then
        sh.Copy After:=wb.Sheets(wb.Sheets.Count)
    End If
Next wb