很多人喜欢学PPT,不喜欢学Excel,因为Excel与表格数据打交道,太枯燥,太无聊,远不如做好一张PPT有成就感。
其实,咱们“表哥”也是有可爱有趣的一面的,可以结合最基本的单元格、公式实现一些逆天的效果。
下面就给大家分享几个,还是那句话,看得再多,也不如自己动手操作啊。
1、制作滚动字幕
前段时间欢乐PPT有一个教程,是用PPT制作电影结束时的滚动字幕,看着PPT如此强大的动画功能,姐姐就想,Excel能不能也实现这个功能呢?于是做了一次尝试,效果貌似还不错。
步骤一:添加按钮
开发工具-插入-按钮,分别修改按钮名称,“开始”和“结束”。
步骤2:输入VBA代码
按Alt+F11键,调出代码输入窗口,插入模块,粘贴代码,将开始按钮指定宏“开始”,结束按钮指定宏“结束”,即可实现单元格内容循环滚动。(要保存为启动宏的工作表)
原始代码:
Dim ABC As Byte
Sub 开始()
ABC = 1
Range("A1") = "我是欢乐PPT罂粟姐姐 "
Do
For j = 1 To 1000
DoEvents
Next j
Range("A1") = Right(Range("A1"), 1) & Left(Range("A1"), Len(Range("A1")) - 1)
Loop Until ABC = 0
End Sub
Sub 结束()
ABC = 0
End Sub
2、制作黑白相间的国际象棋棋盘
最近看网剧《美人为馅》,有这样一个情节:女主人公苏眠和她师兄进行心理学水平高低的较量,而这番较量就放在了一个很大的黑白国际象棋棋盘上。
这黑白格子咋那么像Excel表格呢?于是罂粟姐姐灵机一动,干脆就用Excel做一个黑白棋盘吧。
第一步:
打开Excel,,设置等宽的行高和列宽。
Excel默认行高所使用单位为磅,列宽使用单位为1/10英寸,所以设置等宽的行高和列宽需要进行单位换算,这里可以有一种简单的方法,就是保证行高和列宽的像素一致即可。
第二步:
在“条件格式”-“新建规则”-“使用公式确定要设置格式的单元格”-“为符合此公式的值设置格式”对话框中输入公式:
=or(and(mod(row(),2)=1,mod(column(),2)=1),and(mod(row(),2)=0,mod(column(),2)=0))
公式解读:行为奇数同时列为奇数,或者行为偶数同时列为偶数时,单元格填充黑色。
mod(row(),2)=1判断单元格所在的行是否为奇数,mod(column(),2)=1判断单元格所在的列是否为奇数;
mod(row(),2)=0判断单元格所在的行是否为偶数,mod(column(),2)=0判断单元格所在的列是否为偶数;
or函数:满足其中任意一个条件即可。
3、制作条形码
商品条形码相当于每个商品的身份证,而且还是国际通用的。Excel也可以实现条形码的制作哦。
第一步:
点击工具栏,开发工具-插入→其他控件,在【其他控件】对话框内找到"Microsoft BarCode Control 16.0"控件,单击,确定,通过拖动鼠标,生成初始条形码。
第二步:
单击右键,Microsoft BarCode Control 16.0-属性,在弹出的属性对话框中选择一种样式,例如【7-code-128】,单击确定。
第三步:
输入商品编码,例如A1处输入“138138138138902”。单击原始条形码右键,选择【属性】,在弹出的【属性】对话框中的【Linkecell】栏中输入A1,关闭属性对话框,完成条形码制作。
4、制作动态生日提醒
经常忘记父母、兄弟姐妹、闺蜜、好朋友的生日,怎么办?作为人事部门负责人经常忘记员工的生日,怎么办?作为公司业务员或者公共关系专员经常忘记重要客户的生日,怎么办?
没事,Excel可以非常容易解决这个问题。
第一步:新建Excel表格,输入个人基本信息
第二步:7天内过生日做出相应的“提醒”
公式=IF(DATEDIF(B2-7,TODAY(),"YD")<=7,"提醒","")
DATEDIF(start_date,end_date,unit),Start_date 为起始日期,End_date 为结束日期,Unit 为所需信息的返回类型,其中,“YD”为start_date 与 end_date 日期中天数的差。
当个人生日减去7天后与系统当前的日期进行运算,两者相差小于等于7天即为将过生日的个人。
每次打开Excel表格,会自动更新。
其实这些都是Excel的简单应用,等以后姐姐再给大家分享一些其他的趣味应用,比如小游戏,比如手绘,当然,这些都是次要的,目前最重要的就是熟练掌握Excel,从此告别加班。
今天的教程就到这里啦。希望大家能有收获。