作者ck3300511 (迪恩)
看板Office
标题[算表] 存档前检核是否符合条件才给存档
时间Wed Jul 31 20:40:23 2019
软体:Excel
https://imgur.com/Zj9kLi6
如上图，我想要使用者在填表後、存档前利用VBA检核是否符合规定位数
E栏11码、I栏3码、J和K栏2码、L栏5码
(已有设定资料验证，但使用者都用复制贴上把格式盖掉)
我的想法是在P~T栏用函数Len算出EIJKL栏的位数，然後使用者贴档後
计算每栏的平均值，只要不等於规定的位数，按储存或另存新档，
就会跳出视窗告诉使用者格式错了
但是附件的程式好像不会跑，似乎也不能按F8逐笔执行看看问题在哪
有请高人指点是哪个地方要修正....感谢
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 118.169.113.174 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1564576825.A.7B1.html
1F：→ soyoso: 设个程序sub..end sub，将beforesave内的巨集，复制到该 07/31 21:09
2F：→ soyoso: 程序内，再f8逐笔执行看看 07/31 21:09
3F：→ ck3300511: s大您看我的程式有问题吗? 07/31 22:56
4F：→ soyoso: 提供档案看看 07/31 23:11
5F：→ ck3300511: 好~我明天提供给您 07/31 23:53