我有很多工作表,目前,每三个月我必须一张一张地浏览这些工作表,以更新几个单元格中的信息。
如果我可以创建一个包含这几个更新的单元格的主源文件,我的所有工作表都链接到该文件,那就太好了,这样我就可以更新这个文件,然后我的所有文件都会更新。
我唯一遇到的麻烦是,我然后通过电子邮件将这些工作表发送给客户,每个客户都会收到一个特定的工作表。
这意味着主源文件的本地链接将不再存在,并且我假设会出现错误。有什么方法可以根据需要将我的文件链接到主文件,能够更新主文件并相应地更新所有其他文件,但然后仅将单个文件发送到客户端并保留来自的值主文件。
我希望这是有道理的!我想做的事情很简单,只是用语言表达起来有点棘手。
任何帮助或建议都会很棒!
您可能会认为有一种简单的方法可以开箱即用地执行此操作,但这确实存在一个问题。这个不太优雅的解决方案展示了如何从更新客户工作表时必须打开的主工作簿中复制单元格或范围。显然,客户端用户不会拥有主工作簿,因此在这种情况下宏会默默地失败。将此代码放入每个客户端工作簿的 ThisWorkbook 模块中。
Private Sub Workbook_Open()
On Error Resume Next
Dim master As Workbook
Set master = Workbooks("master.xlsm")
If master Is Nothing Then
'the client is probably opening the wbook. do nothing
Else 'copy your stuff here
With Workbooks("master.xlsm")
.Worksheets("Sheet1").Range("A1:D4").Copy _
Destination:=Worksheets("Sheet1").Range("A1:D4")
End With
End If
End Sub
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)