久久九九全国免费精品观看,亚洲精品99久久久久,欧美大码xxxx

Hello，大家好，今天跟大家分享下我們如何在Excel中實現，數據到期后自動消失的效果，在這里跟大家分享2種解決方法，一種是利用VBA代碼，另一種是利用條件格式，它們的**作也都非常簡單，對照**作都可以設置成功，下面就讓我們來學習下吧

一、VBA代碼

首先我們需要**下方的代碼，然后點擊【開發工具】找到【Visual Basic】在跳出的界面中我們雙擊最下方的【ThisWorkbook】，然后將代碼直接粘貼在右側的空白區域中，然后將這個界面關閉掉即可，至此就設置完畢了

Private Sub Workbook_Open()

Application.DisplayAlerts = False

If Date = "2021/9/10" Then Sheets("sheet2").Delete

Application.DisplayAlerts = Tru

End Sub

這個代碼的作用是將于2021年9月10號刪除sheet2這個工作表。需要注意的是sheet2是VB界面中的名稱，也就是工作表最原始的名稱。如下圖，我們可以看到Sheet2（銷毀數據），所以在這里才會在Sheets("sheet2").Delete這行代碼中出現sheet2，而不是【銷毀數據】這個工作表名稱。至于數據何時消失，我們只需要更改2021/9/10這個日期的值即可。

最后需要注意的是我們需要將文件另存為可以保存宏代碼的格式，一般是另存為【xl**】格式。這個方法也有一定的缺陷，現在很多公司在安全策略上都已經禁止電腦運行宏代碼，如果存在這樣的情況，文件有打不開的可能性。

二、條件格式法

條件格式這個方法相對于VBA，它并不是將數據刪除了，而是為數據設置了格式，將其看不到罷了，因為數據還存在，所以我們需要對單工作表設置保護，防止數據到期后還能繼續使用。

條件格式的特點是：當條件成立就運行我們設置的格式，條件不成立就不做任何更改。所以條件格式能否成功的關鍵就是條件如何設置。

首先我們選擇需要設置的數據區域。然后找到【條件格式】選擇【新建規則】點擊【使用公式確定要設置的格式】隨后在下方將公式設置為：=TODAY()>44449，然后點擊【格式】在【數字】中找到【自定義】將類型設置為;;;需要注意的是這3個分號，需要在英文輸入法下輸入。

在這里today函數的作用是獲取當天的日期，44449就是2021/9/10對應的數值，這個函數的意思就是：今天的時間大于2021年9月10號就代表條件成立，運行我們設置的格式。在這里我們將格式設置為了3個分號，這樣的話單元格就會不顯示任何內容，但是這些數據其實還是存在的，點擊數據的時候，在編輯欄是可以看到數據的，所以緊接著我們就需要為表格設置保護了。