今天给大家分享一个使用Excel做浪漫表白的方法，试想一下，将你做好的表白公式发给心仪的她，在她打开时，会不会由意想不到的惊喜呢，希望不是惊吓，哈哈……

Excel很强大，也可以做很多中表白图形，，今天我们讲一种制作动态图形的方法，效果如下：

1、A2单元格录入-1.81，A3列录入公式=A2+0.02，下拉A列，直到A列的值为1.81

B2单元格录入公式：=POWER(A2^2,1/3)+0.9*SQRT(3.3-A2^2)*SIN($B$1*PI()*A2)

选中B列数据，插入待平滑线的散点图。

2、修改散点图的颜色，删除所有多余的元素。

3、点击开发工具->Visual Basic。

4、在弹出的界面输入以下代码，然后另存为启用宏的工作簿。

Public pp As Boolean

Sub 心形图()

pp = Not (pp)

For i = 0 To 1000 * 4

If pp = False Then

Exit Sub

Else

DoEvents

[B1] = i / 5 / 4

If i Mod 1 = 0 Then

DoEvents

End If

End If

Next i

End Sub

5、在开发工具->插入->按钮，然后在指定宏中选择“心形图”。

点击按钮即可开始或结束动态效果图啦。

郑重声明：本文版权归原作者所有，转载文章仅为传播更多信息之目的，如作者信息标记有误，请第一时间联系我们修改或删除，多谢。