Word哥,Excel竟然还有这么多玩法

作者: 罂粟姐姐 | 来源:发表于2017-01-13 11:39 被阅读2559次

    很多人喜欢学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,从此告别加班。

    今天的教程就到这里啦。希望大家能有收获。

    相关文章

      网友评论

      本文标题:Word哥,Excel竟然还有这么多玩法

      本文链接:https://www.haomeiwen.com/subject/lshrbttx.html