excel表格过期怎么删除吗

1.如何让Excel表格过期自动删除内容

你好，打开你的工作簿文件，按alt+F11组合键，打开vba窗口，双击左边窗口中的thiswordbook，在新打开的窗口中粘贴下面的代码，关闭vba窗口，保存你的文件退出。

这样以后再打开始，若日期等于2016年5月25日程序就会自动……。

Private Sub Workbook_Open()

Application.DisplayAlerts = False

If Date = "2016-5-25" Then Sheets("sheet2").Delete

Application.DisplayAlerts = Tru

End Sub

2.如何让Excel表格过期自动删除内容

你好，打开你的工作簿文件，按alt+F11组合键，打开vba窗口，双击左边窗口中的thiswordbook，在新打开的窗口中粘贴下面的代码，关闭vba窗口，保存你的文件退出。

这样以后再打开始，若日期等于2016年5月25日程序就会自动……。Private Sub Workbook_Open()Application.DisplayAlerts = FalseIf Date = "2016-5-25" Then Sheets("sheet2").DeleteApplication.DisplayAlerts = TruEnd Sub。

3.excel文件中数据链接表格设置使用期限,过期不能使用、且保护和设置

我给个思路吧：

由于数据链接表格肯定是公式，保护工作薄可以保护excel中的公式，

vba可以在工作薄打开的时候操作excel，到时间将这些公式粘贴成数值，链接就不存在了；

因为不能编辑公式，也不能再重建链接。

时间的限制可以在工作薄中隐藏一个表格，记录你设定的期限，以便工作薄打开时能根据这个期限来判断是否将公式粘贴成数值。

以上应该能做，由于你表格的特性，自己考虑下怎么做成吧。有问题可以再追问。

4.Excel 过期自动删除内容

打开你的工作簿文件，按alt+F11组合键，打开vba窗口，双击左边窗口中的thiswordbook，在新打开的窗口中粘贴下面的代码，关闭vba窗口，保存你的文件退出。

这样以后再打开始，若日期等于2016年5月25日程序就会自动……。

Private Sub Workbook_Open()

Application.DisplayAlerts = False

If Date = "2016-5-25" Then Sheets("sheet2").Delete

Application.DisplayAlerts = Tru

End Sub

5.Excel 过期自动删除内容

打开你的工作簿文件，按alt+F11组合键，打开vba窗口，双击左边窗口中的thiswordbook，在新打开的窗口中粘贴下面的代码，关闭vba窗口，保存你的文件退出。

这样以后再打开始，若日期等于2016年5月25日程序就会自动……。Private Sub Workbook_Open() Application.DisplayAlerts = False If Date = "2016-5-25" Then Sheets("sheet2").Delete Application.DisplayAlerts = TruEnd Sub。