編按：
哈嘍，大家好！看到標題相信大家都懵了，「什麽鬼？怎麽excel還會自殺了？」別著急，看看下面這篇文章，你就知道了！
職場中，熟操Excel技能的大神通常都能遊刃有余地應對工作問題，設計出各種各樣的實用樣版，核對出歷史混亂數據的真相。但很多時候，出於保護樣版和數據等目的，Excel大神也會希望這些Excel表格能在一定的條件下自我淪陷。故事裏的嘉，就有這麽一個需求。
—— 片頭曲——
在那遙遠的地方，有個好姑娘，
人們走過了她的賬房，都要回頭留戀地張望。
她那牛逼的表單，好像很流氓，
只要三言兩語的VBA，
就能搞定所有的情況。
—— 故事開始——
嘉是辦公室裏的Excel小仙女，為公司設定了很多實用的Excel樣版，但卻一直不為領導所尊重，屢遭上級的刁難，部門其他同事在使用樣版時的不適當操作也時常被詬病為是嘉設計的樣版有問題。日積月累的DISS終於讓嘉心態崩潰，這些樣版明明是自己工作之余、職責之外的成果，只為同事們得以解放雙手、提高效率，怎就成了自己的罪狀？憤慨之下，嘉決定離職後的一個月就讓這些樣版自動淪陷。於是，她悄悄在這些樣版中寫下了這樣一段VBA語句：
Private Sub Workbook_Open()If Date >= "2020-1-31" Then Application.DisplayAlerts = False Application.ScreenUpdating = False MsgBox "本表自知大限將至，欲駕鶴西去。破琴絕弦無外乎如是，願君安好！" With ThisWorkbook .Saved = True .ChangeFileAccess xlReadOnly Kill .FullName .Close End With Application.DisplayAlerts = TrueEnd IfEnd Sub
在同事的唏噓和主管的自鳴得意中，嘉飄然而去。一切似乎並無不同，缺了嘉這顆螺絲釘，賬房這台機器貌似也照轉不誤。誰料，一個月後，賬房內突然哀鴻遍野，「這個樣版成精了嗎，怎麽自殺了？」，一時間，所有嘉之前設計的樣版都隨她飄然而去了！
瞬間，賬房亂成了一鍋粥，怎麽昨天還用得好好的，今天就GG了？同事們急了，主管懵了，他一個電話打給了嘉。
主管：嘉嘉啊，我們平時用的這些樣版今天突然都沒了，說什麽大限將至？你知道怎麽回事嗎？
嘉嘉：老領導，您都說了，這些表投機取巧沒什麽用，這沒了就沒了唄，賬房不還照轉麽？
主管：不是，他們都急哭了，說這些表能節約80%的工作量呢，以前用著還不覺得，突然一下子失去了，才發現它們的重要性。Excel你最在行了，要不你抽個時間過來看看，我請你吃......
嘉嘉：領導，您也失去我了，不是嗎？
嘟嘟嘟嘟。。。。。。
電話一頭，是傻眼慍怒的主管，電話另一頭，是微笑著踏步走進新公司的嘉。此時，嘉的腦海裏，正回想著當初的操作方法：
1.點選【開發工具】-【Visual Basic】按鈕或按Alt+F11，彈出VBA視窗；
2.雙擊ThisWorkBook，彈出程式碼視窗；
3.將上方語句貼上到程式碼視窗，關閉VBA視窗；
4.將檔另存為「啟用宏的工作簿」，關閉檔即可。
—— 片尾曲——
得不到的永遠在騷動，
被偏愛的都有恃無恐，
沒有這宏，
容易加班的夢，
寫好的樣版卻人去表空，
重新弄。
THE END
有人說，職場一笑泯恩仇，何必事事要出頭；還有人說，工作不敢爭口氣，說啥都被當放屁！對故事中嘉的作法，我們不置可否。但有一點必須肯定，嘉從容而主管崩潰，造成這種差別的原因在於是否有一手過硬的Excel技能。從容高效地處理工作問題就是我們持續學習Excel的動力所在，不是嗎？
最後是給大家的新年福利課程，需要的夥伴，掃碼免費領取學習！
