Excel定义函数自动填充

您正在看的Excel教程是:Excel妙用自定义函数让班级名称自动化。

　　大家知道，我们在编辑Excel工作表时，除了可以用其内置的函数处理表中的数据外，还可以根据自己的实际需要，自定义函数来处理表中的数据。

　　如图1所示是一个学生基本情况登记表，学号的编制原则是：前4位是年份，第5位是初、高中代码(1是初中，2是高中)，第6位是年级代码(1分别代表初、高一等)，第7、8位是班级代码，后面是序号。下面，我们以一个具体的实例，自定义一个函数，根据学号来自动填写班级名称(即图中的D列内容)。

　　1.启动Excel 2003(其它版本请仿照操作)，打开相应的工作表。

　　2.执行“工具→宏→Visual Basic编辑器”命令(或者直接按“Alt+F11”组合键)，进入Visual Basic编辑状态(如图1)。

图1编辑器

　　3.执行“插入→模块”命令，插入一个新模块。再双击插入的模块，进入模块代码编辑状态。

　　4.将下列代码输入其中：

　　Function bj(xh)

　　Select Case Mid(xh, 5, 1)

　　Case 1

　　bj = '初' && Mid(xh, 6, 3) && '班'

　　Case 2

　　bj = '高' && Mid(xh, 6, 3) && '班'

　　End Select

　　End Function

　　[友情提醒]

　　①上述代码中，“bj”是函数命令，“xh”是变量名称，二者均可以随意修改。

　　②自定义函数结构是(如果有多个变量，请用英文状态下的逗号分隔)：

　　Function函数名称(变量名称)

　　代码

　　End Function

　　③使用下面的代码，可以达到同样的效果：

　　Function bj(xh)

　　If Mid(xh, 5, 1) = 1 Then

　　bj = '初' && Mid(xh, 6, 3) && '班'

　　Else

　　bj = '高' && Mid(xh, 6, 3) && '班'

　　End If

　　End Function

　　5.代码输入完成后，关闭Visual Basic编辑窗口，返回Excel编辑状态。

　　6.选中D2单元格，输入公式：=BJ(A2)，再用“填充柄”将上述公式复制到D列下面的单元格区域中，班级名称即可自动填入相应的单元格中(参见图2)。

图2学生登记表

转载于:https://www.cnblogs.com/raymond19840709/archive/2008/03/12/1101399.html

Excel定义函数自动填充相关推荐

C++ 接口函数导出_Python玩转Excel：实现函数自动填充、数据排序
工作中,大家经常会使用excel去处理数据以及展示,但是对于部分工作我们可以借助程序帮忙实现,达到高效解决问题的效果. 比如将接口返回的json解析并保存结果到excel中,按一定规律处理excel中 ...
python按照日期筛选excel_Python玩转Excel：实现函数自动填充、数据排序
工作中,大家经常会使用excel去处理数据以及展示,但是对于部分工作我们可以借助程序帮忙实现,达到高效解决问题的效果. 比如将接口返回的json解析并保存结果到excel中,按一定规律处理excel中 ...
Excel电子表格隔行自动填充底色
Excel电子表格隔行自动填充底色当Excel电子表格中存在大篇幅的数据时,用户查看起来非常的容易看错行.这时用户就会想,要是每隔一行表格用不同的颜色给区分出来,这样看起来就方便直观了许多.下面我们 ...
【Excel】添加自动填充时指定的内容
[Excel]添加自动填充时指定的内容操作: 文件 – 选项 – 高级 – 常规 – 编辑自定义列表 – 输入序列 – 添加 – 确定 – 确定例子: 比如需要输入:周一,周二,周三,周四,周五, ...
excel根据rgb自动填充颜色_Excel一键定位空值与自动填充
原创微信公众号:实用办公编程技能经常做报表的朋友可能会遇到这种烦恼:"好不容易报表做好了,但是给领导看了后,要求没数据的空值也要填充0!" 然后,我们马不停蹄的一个一个格子开始进 ...
excel数据分类与自动填充
目录使数据随机排列数据自动填充到指定行复制到指定行等差数列排列至指定行表格拆分使数据随机排列添加一列辅助序列,键入=rand(),enter键,双击黑色加号使其自动填充至整列选中辅助序 ...
sql 用户定义函数自动生成自增长ID
1 -- -流动人员号自动编号函数,由区域代码-年月日-序列号组成的每日新序号 2 -- -geovindu@163.com 涂聚文 www.dusystem.com 3 if ex ...
excel定义函数操作文档
以利润结算为例: 200元以内扣1元,200元以上按汇率0.5%扣除费用:求:扣完手续费后的金额. 操作一: 操作二: 操作三: 将表格中的某一行插入函数: 操作四: 点击第一格,鼠标移到当前单元格右 ...
Excel中序号自动填充
假设你的第一个序号从A5开始,第一个姓名从B5开始,当姓名不为空时,序号会自增. =IF($B$5:$B$9<>"",(COUNTA($B$5:B6)),"& ...
python自动填写excel,使用python自动填充语料关键词到Excel
不知道是不是实习的原因,最近痴迷于写各种小脚本提高工作效率,hh于是今天就用上了之前做小项目时学的python操作excel啦! 害,说起来惭愧,学习python一年了,基础语法还是记不住,每次要写的 ...

Excel定义函数自动填充

Excel定义函数自动填充相关推荐

最新文章

热门文章