修订功能可以跟踪文档所有的修改，了解修改的过程，这对于团队协同文档编辑、审阅是非常有用的一个功能。将工作簿发送给他人审阅时，我们可以开启修订功能，共享工作簿被修改后，用户查看文档时可以选择接受或者拒绝他人修改的数据信息。本文将详细为您介绍如何接受或拒绝 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
效果图
—本文完—
标签：End,示例,C#,修订,Excel,workbook,文档,Workbook From： https://www.cnblogs.com/Carina-baby/p/17010252.html