月底做考勤統(tǒng)計是很多辦公場景里繞不過去的活。一張考勤明細表可能有上千條打卡記錄你要按人、按日期統(tǒng)計誰遲到、遲到幾次、遲到多少分鐘。如果只是手動處理既費時又容易看漏。我試過用 WorkBuddy 寫 VBA 來解決這類任務(wù)最大的感受不是代碼生成得有多驚艷而是「把需求說清楚」這件事真的可以代替「把代碼敲出來」。你把統(tǒng)計規(guī)則用自然語言描述出來它就能生成一整段能落地的 VBA 代碼。這種體驗與其叫 AI 寫代碼不如叫靠嘴編程。不過這里要先立一個判斷WorkBuddy 寫 VBA 的價值不在把代碼寫得多漂亮而在把門檻從「學(xué)會 VBA 語法」降到了「說清業(yè)務(wù)規(guī)則」。門檻降低不意味著沒有門檻真正的難度會轉(zhuǎn)移到需求表達、數(shù)據(jù)驗證和邊界處理上。下面就用「Excel 考勤遲到統(tǒng)計」這個典型場景把這件事拆開講透。1. 為什么說 WorkBuddy 寫 VBA真正改變的是門檻1.1 VBA 對普通辦公用戶的門檻到底在哪里很多人一開始接觸 Excel 自動化都是從錄制宏開始的。錄制宏可以解決「重復(fù)操作」的問題比如把一個固定格式的表格復(fù)制粘貼成另一種格式?？梢坏┤蝿?wù)里出現(xiàn)循環(huán)、條件判斷、跨工作表讀取、異常值處理錄制宏就完全不夠用了。這時候你必須手寫 VBA而手寫 VBA 要面對的不只是語法本身。VBA 的難點可以分成三層。第一層是語言語法比如 For Each、If、Dim、對象屬性這些其實不算特別難。真正勸退的是第二層Excel 對象模型。Workbook、Worksheet、Range、Cells、UsedRange、End(xlUp) 這些概念之間是嵌套關(guān)系不熟悉的人很容易在「到底是 Sheets(Sheet1) 還是 Worksheets(Sheet1)」這種細節(jié)上反復(fù)報錯。第三層是調(diào)試。代碼沒有按預(yù)期跑你是查數(shù)據(jù)類型、查列號、查空值還是查區(qū)域引用新手往往不知道從哪里下手。很多辦公用戶的需求其實很簡單我不想學(xué)完整套對象模型我只想把這個月的遲到情況算清楚。以前這個訴求很難滿足因為哪怕需求再簡單也得有人把它翻譯成 VBA。1.2 靠嘴編程真正解決的是什么靠嘴編程并不是說人完全不碰鍵盤而是指需求描述和代碼生成這兩件事被分開了。你用自然語言把統(tǒng)計規(guī)則說清楚WorkBuddy 這類對話式編程助手負責(zé)把規(guī)則翻譯成 VBA。它的工作方式非常像你旁邊坐了一個熟悉 Excel 對象模型的同事你說「幫我統(tǒng)計每天早上 9 點以后打卡的員工按人匯總遲到次數(shù)輸出一個新表」他寫完代碼后你試運行發(fā)現(xiàn)問題再繼續(xù)改。這件事真正改變的是響應(yīng)速度。以前從需求到 VBA 代碼中間要有一個人完成「理解需求 設(shè)計算法 翻譯成語法 調(diào)試」四個環(huán)節(jié)?，F(xiàn)在前兩步還是人來做第三步交給模型調(diào)試變成人機協(xié)作。于是一個完全沒系統(tǒng)學(xué)過 VBA 的人也有機會在半小時內(nèi)得到一份可用的統(tǒng)計宏。身邊有不少人都在問這類工具怎么安裝、怎么用也有不少人在搜 VBA 入門教程。這些問題的背后是同一個痛點不是專業(yè)程序員卻被 Excel 重復(fù)勞動困住的人。1.3 它沒有解決什么這里必須說清楚邊界?？孔炀幊探档偷氖菍懘a的門檻但沒有降低「確認代碼對不對」的責(zé)任。你還是要知道代碼大概做了什么至少能看懂關(guān)鍵幾行它讀取了哪個工作表、判斷條件是哪一個字段、輸出寫到哪里。如果完全不管代碼邏輯拿到代碼就跑輕則結(jié)果少算幾行重則覆蓋原始數(shù)據(jù)。尤其是在考勤、工資這類涉及員工利益的表里出錯的影響比「代碼寫不出來」大得多。2. 用 WorkBuddy 完成考勤遲到統(tǒng)計一次完整實操鏈路2.1 動手前先確認三件事文件格式、宏權(quán)限、運行環(huán)境第一件事文件格式。VBA 宏不能保存在默認的 .xlsx 文件里。你至少要先把工作簿另存為 .xlsm啟用宏的工作簿或 .xlsb二進制工作簿否則保存時宏會丟失白忙一場。第二件事宏權(quán)限。Excel 默認可能禁用宏。你可以在「信任中心」里設(shè)置宏安全級別更穩(wěn)妥的做法是把工作簿放到受信任位置然后從那里打開。這里有個底線原則不要運行任何你不清楚來源、不清楚功能的宏。AI 生成的代碼也不能例外。第三件事運行環(huán)境。用 Excel 和用 WPS 處理 VBA體驗不完全一樣。WPS 通常需要單獨安裝 VBA 支持組件而且部分對象模型行為、函數(shù)兼容性有差異。如果你是在 WPS 環(huán)境里跑生成代碼之前最好先和 WorkBuddy 說明「運行環(huán)境是 WPS 表格」減少后來的調(diào)整成本。新版本 WPS 也有自己的 JS 加載項方案但和 VBA 不是同一套代碼體系遷移成本并不低。如果你還沒安裝 WorkBuddy還需要先完成安裝、登錄和模型配置。不同版本的安裝入口和模型選擇會有差異實際操作以官方文檔和當前界面為準。不要隨便從網(wǎng)上復(fù)制一段沒看懂的 VBA 就運行尤其是涉及文件刪除、郵件發(fā)送、外部連接、修改原始數(shù)據(jù)的操作。先用副本測試確認邏輯后再放到正式文件里。2.2 把需求說成一段「AI 能聽懂」的輸入說明很多人第一次用這類工具只說一句「幫我統(tǒng)計遲到」這是不夠的?？记诒黹L什么樣、哪一列是時間、遲到標準是什么、結(jié)果輸出到哪里這些信息缺一個生成的代碼就可能跑錯方向。我建議按下面這張表組織需求描述維度要提供的信息例子數(shù)據(jù)表結(jié)構(gòu)工作表名、表頭、列順序表名「考勤明細」B 列姓名C 列上班打卡時間數(shù)據(jù)樣例貼兩到三行真實數(shù)據(jù)的脫敏版本張三 2025-06-02 08:52判定規(guī)則遲到的具體標準上班打卡時間大于 9:00:00 算遲到特殊規(guī)則缺卡、請假、周末、節(jié)假日怎么處理缺卡不計入遲到但單獨標記輸出要求輸出到哪、要匯總還是明細新建「遲到統(tǒng)計」表按人匯總次數(shù)另附明細一個比較完整的描述可以是我的「考勤明細」表里A 列是日期B 列是姓名C 列是上班打卡時間從第 2 行開始有數(shù)據(jù)。請幫我寫一段 VBA每天上班打卡時間晚于 9:00:00 算遲到統(tǒng)計每個人總共遲到幾次并把「姓名、遲到次數(shù)」寫入新工作表「遲到匯總」同時把遲到記錄寫入「遲到明細」。如果 C 列為空跳過這一行不參與統(tǒng)計。你會發(fā)現(xiàn)這段話沒有用任何 VBA 關(guān)鍵詞但它已經(jīng)是模型生成代碼所需的完整輸入。你說得越具體生成的第一版代碼就越接近可用狀態(tài)。2.3 生成代碼后的落地方式與首次驗證拿到代碼后把它放進 VBA 模塊里運行。常規(guī)路徑是按 AltF11 打開 VBA 編輯器插入模塊粘貼代碼回到 Excel 后用 AltF8 打開宏列表執(zhí)行。下面是這類統(tǒng)計任務(wù)常見的代碼骨架我標注為示意結(jié)構(gòu)。實際生成結(jié)果會因表結(jié)構(gòu)不同而調(diào)整不要照抄后直接用于生產(chǎn)Sub 統(tǒng)計遲到() Dim ws As Worksheet Dim outWs As Worksheet Dim i As Long Dim lastRow As Long Dim 遲到閾值 As Date 閾值和表名建議寫成常量方便每月調(diào)整 遲到閾值 TimeValue(09:00:00) Set ws ThisWorkbook.Worksheets(考勤明細) 新建輸出表避免覆蓋原始數(shù)據(jù) Set outWs ThisWorkbook.Worksheets.Add(After:ThisWorkbook.Worksheets(ThisWorkbook.Worksheets.Count)) outWs.Name 遲到統(tǒng)計 lastRow ws.Cells(ws.Rows.Count, C).End(xlUp).Row 從第 2 行開始循環(huán)第 2 列姓名第 3 列打卡時間 For i 2 To lastRow If ws.Cells(i, 3).Value And IsDate(ws.Cells(i, 3).Value) Then If ws.Cells(i, 3).Value 遲到閾值 Then 這里寫入?yún)R總邏輯和明細邏輯 Debug.Print ws.Cells(i, 2).Value 遲到時間 ws.Cells(i, 3).Value End If End If Next i MsgBox 統(tǒng)計完成請檢查輸出表 End Sub這段代碼里有兩個地方值得留意一是用IsDate判斷 C 列能不能被當成時間解析避免文本格式混進來二是用Debug.Print在立即窗口打印結(jié)果方便你核對邏輯而不是直接寫一堆你自己都拿不準的記錄。首次驗證一定要用副本數(shù)據(jù)。我的建議是復(fù)制原始考勤表只保留最近一周的記錄文件名改成「測試用」然后在這個文件里運行代碼。這樣即使代碼有誤也不會影響正式數(shù)據(jù)。2.4 第一次調(diào)試從哪里開始如果運行后報錯或者結(jié)果跟你手動統(tǒng)計不一致先別急著讓模型整段重寫。你自己先走一遍排查這樣溝通效率最高。常見的情況按順序排查報錯信息是什么是「下標越界」還是「類型不匹配」先把完整報錯文本記下來。列號是不是對的你描述里說 C 列是打卡時間但代碼里用的是Cells(i, 3)這兩個必須對應(yīng)。時間格式是不是文本很多考勤系統(tǒng)導(dǎo)出的時間看起來是 08:52實際在 Excel 里是文本。文本和日期比較會出錯需要先用TimeValue或CDate轉(zhuǎn)換。數(shù)據(jù)范圍有沒有包含表頭如果從第 1 行開始循環(huán)表頭也可能被當成數(shù)據(jù)。有沒有空行、合并單元格、隱藏行這些會讓End(xlUp)判斷出錯的記錄。你把具體現(xiàn)象描述給 WorkBuddy比如「運行后提示類型不匹配C 列可能是文本格式我該怎么處理」比直接說「代碼不對重新生成」有效得多。這也是靠嘴編程時代里最值得練的一個習(xí)慣描述現(xiàn)象而不是發(fā)泄情緒。3. 決定統(tǒng)計結(jié)果的是業(yè)務(wù)規(guī)則不是代碼3.1 考勤統(tǒng)計里最容易出錯的規(guī)則點代碼只是把規(guī)則翻譯成機器能執(zhí)行的東西。規(guī)則本身如果含糊代碼再對也沒用?？记谶t到統(tǒng)計這個場景里有幾個坑非常典型。第一個是遲到閾值。9 點上班但有的公司有 5 分鐘寬限期9:05 之前不算遲到。不寫清楚AI 只能按最常見理解處理。第二個是缺卡。有人早上沒打卡有人只打了上班卡沒打下班卡。缺卡通常不應(yīng)該簡單記為遲到最好單獨標記讓人去核對補