作者qsss (Qsss)
看板Visual_Basic
标题Re: [VBA ] 请问EXCEL里我要写一个自定函数?
时间Mon Oct 23 18:05:18 2006
※ 引述《tyadsl (南じゃん)》之铭言:
: Function TOBENUM(str1 as string) as string
: IF str1 = [0-9] THEN
: select case str1
: case 1
: TOBENUM = 1
: case 2
: TOBENUM = 2
: ...
: end select
: ELSE
: select case str1
: case "A"
: TOBENUM = 10
: case "B"
: TOBENUM = 11
: ...
: end select
: END IF
1. 要写在 模组 里面
2. If 判断式好像是多余的
3. Case跟回传没有加 "" (好像没差)
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 203.73.240.88