修订功能可以跟踪文档所有的修改,了解修改的过程,这对于团队协同文档编辑、审阅是非常有用的一个功能。将工作簿发送给他人审阅时,我们可以开启修订功能,共享工作簿被修改后,用户查看文档时可以选择接受或者拒绝他人修改的数据信息。本文将详细为您介绍如何接受或拒绝 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
效果图
—本文完—