excel表格怎么利用VBA制作闪烁的我爱中国效果?
excel表格怎么利用VBA制作闪烁的我爱中国效果？excel表格中想要制作一个闪烁的我爱中国的文字，该怎么制作呢？下面我们就来看看使用vba制作的教程，需要的朋友可以参考下VBA是Excel自动化的重要组成部分，Excel表格用于表示或展示数据，VBA则是对数据进行处理。今天我们就来看看使用vba制作闪烁的我爱中国文字的教程。
1、首先，我们在Excel表格中如图按升序将数字输入表格，以方便在VBA中进行读取和处理操作。如图：
2、进入VBA环境，可以按键盘上的“Alt+F11”进入。双击“Microsoft Excel对象”下面的sheet1（sheet1），为表格sheet1添加代码
3、在sheet1代码编辑窗口中添加如下代码：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i, j, k, introw, intcol As Integer
For k = 1 To 184
For i = 4 To 26
For j = 2 To 31
If Sheets(1).Cells(i, j).Value = k Then
Application.Wait (Now + TimeValue("00:00:01") * 0.5)
Sheets(1).Cells(i, j).Interior.ColorIndex = 3
End If
Next j
Next i
Next k
For k = 1 To 6
Application.Wait (Now + TimeValue("00:00:01") / 1.5)
For i = 5 To 23
For j = 6 To 12
If Sheets(1).Cells(i, j).Value = 1000 And (k Mod 2 = 0) Then
Sheets(1).Cells(i, j).Interior.ColorIndex = 3
End If
If Sheets(1).Cells(i, j).Value = 1000 And (k Mod 2 = 1) Then
Sheets(1).Cells(i, j).Interior.ColorIndex = 0
End If
Next j
Next i
Next k
Cells.ClearFormats
End Sub
4、返回Excel表格，在Sheet1工作表任意空白处单击，就可以看到“I❤中国”文字按笔画顺序变红，之后红色心形中心在“扑通扑通”闪烁。至此大功告成啦。
以上就是EXCEL用VBA制作我爱中国的教程，希望大家喜欢，请继续关注脚本之家。
相关文章
-
Excel教程Excel表格下拉列表怎么设置详细阅读
Excel表格下拉列表怎么设置呢？很多用户对此还不是很清楚，小编这里就给大家带来有关Excel表格下拉列表怎么设置的回答，希望能够对大家有所帮助。......
2023-01-18
-
Excel教程Excel如何打印选定区域详细阅读
Excel如何打印选定区域呢？很多用户对此还不是很清楚，小编这里就给大家带来有关Excel如何打印选定区域的回答，希望能够对大家有所帮助。......
2023-01-18
-
Excel教程Excel怎么设置英文首字母大写详细阅读
Excel怎么设置英文首字母大写？Excel中输入英文首字母大写怎么操作？当我们需要将Excel表格中的英文单词，把首字母全部大写，该怎么操作呢，怎么将Excel中英文首字母大写，Excel怎么设置英文首字母大写，下面就和小编一起来看看吧！......
2023-01-18
-
Excel教程Excel怎么给所有的数字加10详细阅读
Excel怎么给所有的数字加10？Excel数字怎么全部加10？怎么全部加1？当我们在使用Excel时，所有的数字都少10，或者1，该怎么给所有的数字都+10、+1呢，Excel怎么给所有的数字加10，EXcel数字怎么全部加10，下面就和小编一起来看看吧！......
2023-01-18
-
Excel教程Excel怎么设置日期自动更新详细阅读
Excel怎么设置日期自动更新？Excel怎么设置日期自动更新？当我们Excel表格中的日期需要实时更新到最新日期，该怎么设置呢，怎么将Excel表格日期自动更新到最新日期，Excel怎么设置日期自动更新，下面就和小编一起来看看吧！......
2023-01-18
不要在微信、知乎、QQ、内置浏览器下载、请用手机浏览器下载！ 如果您是手机用户，请移步电脑端下载！
1、文稿PPT，仅供学习参考，请在下载后24小时删除。
2、如果资源涉及你的合法权益，第一时间删除。
3、联系方式：mail@johngko.com
第一素材网 » excel表格怎么利用VBA制作闪烁的我爱中国效果?
