excel如何设置到期消除工作表所有内容

答案:3 悬赏:20 手机版

解决时间 2021-03-02 03:51

提问者网友：椧運幽默
2021-03-02 00:31

如：一份有多数据和公式的工作表中，我想设置到某日期后，该工作表里面所有内容（含公式）全部消除，请问怎样写VB之类的？

最佳答案

五星知识达人网友：等灯
2021-03-02 00:48

Sub 清除()
If Date + Time > "2012-12-10 10:00" Then
Sheet1.Select
Cells.Select
Selection.Clear
End If

End Sub

解释：当前时间在2012-12-10 10:00以后的话，sheet1里面的所有内容会清空。

时间你可以随便设定，同样可以通过窗口控件输入时间来定义。或者在打开文件时自动执行。

全部回答

1楼网友：西岸风
2021-03-02 02:23

要想设置自动清除内容，得用vba来实现了。具体代码得根据你的表格设计来处理。

2楼网友：上分大魔王
2021-03-02 01:41

如C0708005所说,将代码添到OPEN 事件中,但宏有个问题是不同的电脑设置安全性不一致,在别的电脑上由于设置问题,可能宏根本就不会执行,就没意义了.

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息