如何将多个链接工作表的.xlsx拆分为单独的工作表文件,以及如何重新组装？

Question

已为非IT相关类分配了一个组项目,其中将存储的工作是单个.xlsx文件.成员们决定协作编辑所述文件的最佳方式是将其拆分为组成表,将每个*.xlsx表上传到SVN存储库,并使用锁和.txt文件来组织工作表/成员职责.

该小组用VB脚本(由这个精彩的网站提供)完成了对所述文件的拆分,如下所示:

Sub SaveSheets()
Dim strPath As String
Dim ws As Worksheet

Application.ScreenUpdating = False

strPath = ActiveWorkbook.Path & "\"
For Each ws In ThisWorkbook.Sheets
    ws.Copy
    'Use this line if you want to break any links:
    BreakLinks Workbooks(Workbooks.Count)
    Workbooks(Workbooks.Count).Close True, strPath & ws.Name & ".xlsx"
Next

Application.ScreenUpdating = True
End Sub

Sub BreakLinks(wb As Workbook)
    Dim lnk As Variant
    For Each lnk In wb.LinkSources(xlExcelLinks)
        wb.Breaklink lnk, xlLinkTypeExcelLinks
    Next
End Sub

因此,该组现在具有一个存储库,其中每个成员当前正在编辑它们各自的文件.接下来的问题是,我们如何能够自动完成这些文件的重新统一成一个.xlsx文件与原来的链接保存.

编辑4/2:开始赏金//我知道,链接是"破",由上面的脚本,但我不完全知道这意味着什么,虽然我怀疑这会使得重新组装与原路段更难保存.应该注意的是,具有链接的原始文件仍然可用,并且可能可用于帮助解决此问题.

编辑4/2:Excel版本是2010年 - 当前文件中不存在原始链接.

编辑4/3:原始链接不在当前文件中,但希望通过重新统一原始链接(来自原始未编辑文件,预分割)重新创建/保留.

Answer 1

如果您有 SharePoint，则可以更新同一本 Excel（2003 或 2010）书籍。

http://office.microsoft.com/en-us/excel-help/about-shared-workbooks-HP005262294.aspx