修訂功能可以跟蹤檔案所有的修改,了解修改的程序,這對于團隊協同檔案編輯、審閱是非常有用的一個功能,將作業簿發送給他人審閱時,我們可以開啟修訂功能,共享作業簿被修改后,用戶查看檔案時可以選擇接受或者拒絕他人修改的資料資訊,本文將詳細為您介紹如何接受或拒絕 Excel 中的修訂,
- 接受作業簿中的修訂
- 拒絕作業簿中的修訂
程式環境:
本次測驗時,在程式中引入 Spire.XLS.dll 檔案,
方法1:
將Free Spire.XLS for .NET?? 下載到本地,解壓,找到 BIN 檔案夾下的 Spire.XLS.dll,然后在 Visual Studio 中打開“解決方案資源管理器”,滑鼠右鍵點擊“參考”,“添加參考”,將本地路徑 BIN 檔案夾下的 dll 檔案添加參考至程式,
方法2::
通過?NuGet??安裝,可通過以下 2 種方法安裝:
1. 可以在 Visual Studio 中打開“解決方案資源管理器”,滑鼠右鍵點擊“參考”,“管理 NuGet 包”,然后搜索“Free Spire.XLS”,點擊“安裝”,等待程式安裝完成,
2. 將以下內容復制到 PM 控制臺安裝,
Install-Package FreeSpire.XLS -Version 12.7
接受作業簿中的修訂
- 創建一個Workbook物件,
- 使用 Workbook.LoadFromFile() 方法加載示例 Excel 檔案,
- 呼叫Workbook.HasTrackedChanges 屬性確認作業簿是否是否含有跟蹤修訂,
- 使用Workbook.AcceptAllTrackedChanges() 方法接受作業簿中的所有修訂,
- 使用 Workbook.SaveToFile() 方法保存結果檔案,
完整代碼
C#
using Spire.Xls; namespace AcceptTrackedChanges { class Program { static void Main(string[] args) { //創建一個Workbook物件 Workbook workbook = new Workbook(); //加載示例檔案 workbook.LoadFromFile("示例檔案.xlsx"); //確認作業簿是否含有跟蹤修訂 if (workbook.HasTrackedChanges) { //接受作業簿中的所有修訂 workbook.AcceptAllTrackedChanges(); } //保存結果檔案 workbook.SaveToFile("接受修訂.xlsx", FileFormat.Version2013); } } }
VB.NET
Imports Spire.Xls Namespace AcceptTrackedChanges Friend Class Program Private Shared Sub Main(ByVal args As String()) '創建一個Workbook物件 Dim workbook As Workbook = New Workbook() '加載示例檔案 workbook.LoadFromFile("示例檔案.xlsx") '確認作業簿是否含有跟蹤修訂 If workbook.HasTrackedChanges Then '接受作業簿中的所有修訂 workbook.AcceptAllTrackedChanges() End If '保存結果檔案 workbook.SaveToFile("接受修訂.xlsx", FileFormat.Version2013) End Sub End Class End Namespace
效果圖

拒絕作業簿中的修訂
- 創建一個Workbook物件,
- 使用 Workbook.LoadFromFile() 方法加載示例 Excel 檔案,
- 呼叫Workbook.HasTrackedChanges 屬性確認作業簿是否含有跟蹤修訂,
- 使用Workbook.RejectAllTrackedChanges() 方法拒絕所有修訂,
- 使用 Workbook.SaveToFile() 方法保存結果檔案,
完整代碼
C#
using Spire.Xls; namespace AcceptTrackedChanges { class Program { static void Main(string[] args) { //創建一個Workbook物件 Workbook workbook = new Workbook(); //加載示例 Excel 檔案 workbook.LoadFromFile("示例檔案.xlsx"); //確認作業簿是否含有跟蹤修訂 if (workbook.HasTrackedChanges) { //拒絕所有修訂 workbook.RejectAllTrackedChanges(); } //保存結果檔案 workbook.SaveToFile("拒絕修訂.xlsx", FileFormat.Version2013); } } }
VB.NET
Imports Spire.Xls Namespace AcceptTrackedChanges Friend Class Program Private Shared Sub Main(ByVal args As String()) '創建一個Workbook物件 Dim workbook As Workbook = New Workbook() '加載示例 Excel 檔案 workbook.LoadFromFile("示例檔案.xlsx") '確認作業簿是否含有跟蹤修訂 If workbook.HasTrackedChanges Then '拒絕所有修訂 workbook.RejectAllTrackedChanges() End If '保存結果檔案 workbook.SaveToFile("拒絕修訂.xlsx", FileFormat.Version2013) End Sub End Class End Namespace
效果圖

—本文完—
轉載請註明出處,本文鏈接:https://www.uj5u.com/net/540836.html
標籤:.NET技术
