※ 引述《tyadsl (南じゃん)》之铭言： : 请教高手 : 因为公司要由Barcode标签的一串数字中找出所代表的日期 : FT5519M040056130139905 其中第15个字代表日期 : 第15位数的范围是由1,2,3,~9,A,B,C,~V : 分别代表日期1号,2号,3号,~9号,10号,11号,12号,~31号 : 因此我用 MID(C5,15,1) 函数找出来是 3 : 我写了一个自定函数，数字的部份可以判断出来 : 当MID(C5,15,1) 找出来是文字的部份就不行了 其实...用EXCEL内的自订函数就可以噜:) 假设条码的位址在A1 B1的公式就设成 IF(CODE(MID(A1,15,1))<=57, MOD(CODE(MID(A1,15,1)),48), MOD(CODE(MID(A1,15,1)),55)) 对电脑来说 数字1~9的编码为49~57 字母A~V的编码是65~86 因此用CODE函数取出第15个数字的编码後 如果编码小於等於57，代表他是数字 用48取余数(MOD函数)後会得到1~9的数字 若是大於57，则是英文 以55取余数後，则会得到10~31的数字 公式有点长... 试试看吧^^" -- 好像跟VBA完全没关XD --

※ 发信站: 批踢踢实业坊(ptt.cc) ◆ From: 221.169.7.130 ※ 编辑: Catbert 来自: 221.169.7.130 (10/24 01:41)