将 Excel 文档发送给其他人审阅时,建议打开修订功能以确保记录对工作表或工作簿所做的所有更改。对于 Excel 中已更改的单元格,每个单元格将在其左上角用蓝色三角形突出显示。然后,您可以查看更改并决定是否接受或拒绝修订。本文将演示如何使用Spire.XLS for .NET 以编程方式接受或拒绝 Excel 中的所有修订.
安装 Spire.XLS for .NET
首先,您需要添加 Spire.XLS for .NET 包中包含的 DLL 文件作为 .NET 项目中的引用。DLL 文件可以从此链接下载或通过 NuGet 安装。
PM> Install-Package Spire.XLS
接受工作簿中的修订
要接受工作簿中的修订,您首先需要使用 Workbook.HasTrackedChanges 属性确定工作簿是否含有跟踪修订。如果是,则可以使用 WorkBook.AcceptallTrackedChanges() 方法一次接受所有修订。以下是接受 Excel 工作簿中所有修订的步骤。
- 创建一个 Workbook 对象。
- 使用 Workbook.LoadFromFile() 方法加载示例 Excel 文档。
- 调用 Workbook.HasTrackedChanges 属性确认工作簿是否是否含有跟踪修订。
- 使用 Workbook.AcceptAllTrackedChanges() 方法接受工作簿中的所有修订。
- 使用 Workbook.SaveToFile() 方法保存结果文档。
- C#
- VB.NET
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);
}
}
}
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
拒绝工作簿中的修订
如果修订已被确认存在于工作簿中,Spire.XLS for.NET 还提供了 Workbook.RejectAllTrackedChanges() 方法,以一次拒绝所有修订。具体步骤如下。
- 创建一个 Workbook 对象。
- 使用 Workbook.LoadFromFile() 方法加载示例 Excel 文档。
- 调用 Workbook.HasTrackedChanges 属性确认工作簿是否含有跟踪修订。
- 使用 Workbook.RejectAllTrackedChanges() 方法拒绝所有修订。
- 使用 Workbook.SaveToFile() 方法保存结果文档。
- C#
- VB.NET
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);
}
}
}
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
申请临时 License
如果您希望删除结果文档中的评估消息,或者摆脱功能限制,请该Email地址已收到反垃圾邮件插件保护。要显示它您需要在浏览器中启用JavaScript。获取有效期 30 天的临时许可证。