excel公式与函数大辞典读书心得（Excel函数学习悟空百问の005）

七夕将至，又赶上七月初四我媳妇生日，研究研究表白函数/表格/VBA,网上能收到很多效果。

1.有的是通过信息内容，来条件格式，来显示单元格颜色效果。

2.有的有图形法，通过信息的变化画一个曲线爱心。

本期重点

本期关键词：时间延迟效果/VBA/累加符号&/无限循环/1秒钟刷新

今天我就自己研究个表白表格，延迟效果 字体显示，删除内部截止函数，可以无限循环表白。哈哈~~来看看效果吧~

动态效果

1.由于我们做的是一个循环的表白效果，所以我们要先准备一个可以循环的字幕，字幕内容。

2.为了能达到这个表白效果，要带有名字，做一个信息引用。用~"桃心"&C2&"桃心"~增加效果。

3.前面的信息是通过VLOOKUP数字来引用的，所以要加一个数字前列。

滚动信息

这个本家杨超越同学还是蛮好看的~嘿嘿~

1.文件-选项-自定义功能区-开发工具-加载项（我的Excel用的是Office 2016，此处选择就可以增加开发工具，制作宏做准备。）

2.开启这个宏的启用-文件-选项-信任中心-信任中心设置-宏设置-启用宏（有的小伙伴说宏怎么都无法制作，那是因为你这个宏被禁用了！）

开启宏

3.建立今天重点项目，一个宏！（第一个宏是可以停止的，第二个是无限循环的，今天的课程是讲的是无限循环效果。）

第一个宏：数字到10，即刻停止：

Public k As Integer

Sub Start()

k = k 1

If k > 10 Then Exit Sub

Application.OnTime Now TimeValue("0.00.01"), "Start"

[a1] = [a1] 1

End Sub

第二个宏：无限循环：

Sub Start()

Application.OnTime Now TimeValue("0.00.01"), "Start"

[a1] = [a1] 1

End Sub

4.宏的创建：

开发工具-宏-宏名（start）-创建-复制上面的宏-粘贴-保存~结束~

宏的建立

3.创建一个宏-按钮~

1.开发工具-插入-按钮-框一个效果出来-写上字：请输入完名字后，按此按钮！

此按钮就是执行按钮，安完了就开始无限循环模式~

按钮

按完按钮你会发现这个A1的单元格开始读秒，一秒一个数字，通过这里的数字来VLOOKUP后面的数据，你懂得~然后你会想这个数值时无限放大的？是的无限循环的数值是无限往下读的，怎么停？上面不是给了你一个数到10就停止的么~你懂了吧。

还有就是这个信息你这样子处理，大于10怎么办？用mod函数啊，读10的余数，所得信息都是这个0-9，嘿嘿~~

读取信息在此：=VLOOKUP(MOD(A1,10),Sheet2!B:C,2,0)

数据读取

4.设置一个背景~

诶，你会发觉这个表白，有点丑吧，怎么说呢，就是不够花哨，不够骚~

1.页面布局-背景-加载一个图~

背景

2.首列值，直接隐藏，不再显示~只显示我们的文字区域~

5.滚动表白雄起~

保存文件，发送给哪个你喜欢的她~~去吧~

七夕将至，雄起~~(●￣(ｴ)￣●)

,