[算表] 存檔前檢核是否符合條件才給存檔

作者: ck3300511 (迪恩)   2019-07-31 20:40:23
軟體:Excel
https://imgur.com/Zj9kLi6
如上圖,我想要使用者在填表後、存檔前利用VBA檢核是否符合規定位數
E欄11碼、I欄3碼、J和K欄2碼、L欄5碼
(已有設定資料驗證,但使用者都用複製貼上把格式蓋掉)
我的想法是在P~T欄用函數Len算出EIJKL欄的位數,然後使用者貼檔後
計算每欄的平均值,只要不等於規定的位數,按儲存或另存新檔,
就會跳出視窗告訴使用者格式錯了
但是附件的程式好像不會跑,似乎也不能按F8逐筆執行看看問題在哪
有請高人指點是哪個地方要修正....感謝
作者: soyoso (我是耀宗)   2019-07-31 21:09:00
設個程序sub..end sub,將beforesave內的巨集,複製到該程序內,再f8逐筆執行看看
作者: ck3300511 (迪恩)   2019-07-31 22:56:00
s大您看我的程式有問題嗎?
作者: soyoso (我是耀宗)   2019-07-31 23:11:00
提供檔案看看
作者: ck3300511 (迪恩)   2019-07-31 23:53:00
好~我明天提供給您

Links booklink

Contact Us: admin [ a t ] ucptt.com