|
网络发烧友
|
1#
大 中
小 发表于 2007-3-27 17:45 只看该作者
班级名称自动化——excel自定义函数的妙用
大家知道，我们在编辑excel工作表时，除了可以用其内置的函数处理表中的数据外，还可以根据自己的实际需要，自定义函数来处理表中的数据。
/ d# A6 I8 I& O" _' d/ l. |163K网站系统官方论坛 如图1所示是一个学生基本情况登记表，学号的编制原则是：前4位是年份，第5位是初、高中代码（1是初中，2是高中），第6位是年级代码（1分别代表初、高一等），第7、8位是班级代码，后面是序号。下面，我们以一个具体的实例，自定义一个函数，根据学号来自动填写班级名称（即图中的d列内容）。
% }( }% t2 b9 Q( l团购网站系统,团购网程序) a0 g0 i# [: [4 r) d
1. 启动excel 2003（其它版本请仿照操作），打开相应的工作表。团购网站系统,团购网程序4 j) V8 D( B& ^0 @ v2 a, S
2. 执行“工具→宏→visual basic编辑器”命令（或者直接按“alt+f11”组合键），进入visual basic编辑状态（如图2）。
5 l& i' R9 R: Z$ k 163k团购网站系统官方服务论坛& M+ {& q" e4 w$ @
图2 编辑器bbs.163k.com) T. `3 F/ Z- ~8 }
3. 执行“插入→模块”命令，插入一个新模块。再双击插入的模块，进入模块代码编辑状态。
3 }( w9 N$ z1 Y3 h& ?$ A3 b) d5 I163k团购网站系统官方服务论坛4. 将下列代码输入其中：
- ^" U# I3 V/ [6 K4 v' m; `/ Fbbs.163k.comfunction bj(xh)163k团购网站系统官方服务论坛 F5 M2 ?2 m, @- n! S+ [) J% ?
select case mid(xh, 5, 1)163K网站系统官方论坛! T1 G, z6 X9 e$ e0 X* S+ ?
case 1
J L5 z' d1 f G8 v3 H% A; |163k团购网站系统官方服务论坛bj = "初" && mid(xh, 6, 3) && "班"163K网站系统官方论坛* \* y6 i0 b) Y$ J1 S
case 2
1 t3 h6 P* I" w7 ?6 r9 V163k团购网站系统官方服务论坛bj = "高" && mid(xh, 6, 3) && "班"163k团购网站系统官方服务论坛8 R5 u) j% j& [* o
end select: }; _7 U$ [' K# d& e X& w0 d
end functionbbs.163k.com8 F7 G' e+ A, X A! E
[友情提醒]
- e8 u( c$ v9 Q163K网站系统官方论坛①上述代码中，“bj”是函数命令，“xh”是变量名称，二者均可以随意修改。4 H. N' p+ h+ S! m0 H! T# U! ^
②自定义函数结构是（如果有多个变量，请用英文状态下的逗号分隔）：163k团购网站系统官方服务论坛. n- y( J. A# u7 Z+ u1 N, s
function 函数名称(变量名称)) E& {2 Q3 G3 _2 Y" a( G/ I( B
团购网站系统,团购网程序5 `. B. D. d1 m* }9 K
' N* z2 O) Y7 q7 M) v' B为互联网事业发展提供源动力！
/ g! \# a5 D) E& ]7 i$ \163K网站系统官方论坛
/ l: N/ b+ ]) u& ^& D/ ]. w; s
|
