Re: [VBA ] 請問EXCEL裡我要寫一個自定函數？
※ 引述《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)
推
10/24 08:03, , 1F
10/24 08:03, 1F
討論串 (同標題文章)
本文引述了以下文章的的內容：
完整討論串 (本文為第 3 之 3 篇)：
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
