在EXCEl中使用VBA制作动画

vba不仅仅可以进行计算与设计操作界面，还可以制作动画控制动画，这里以简单的旋转操作来制作旋转动画

前期准备工作（包括相关工具或所使用的原料等）

EXCEL

详细的操作方法或具体步骤

点击开发工具-visual basic打开编程界面，如果没有开发工具选项，可以再文件-选项中加载

回到工作表，插入心型形状和部分插件，如图

进入编程界面

Private Sub ToggleButton1_Click() Do While ToggleButton1.Value Shapes("组合 5").IncrementRotation Range("c1").Value DoEvents With Shapes(1) If Cells(1, 5)=1 Then i=i + 10 Else i=i - 10 End If .Top=Sin(i * (3.14 / 180)) * 100 + 100 .Left=Cos(i * (3.14 / 180)) * 100 + 100 End With LoopEnd SubSub 滚动条4() Sheet1.Shapes(1).Select Selection.ShapeRange.Width=Cells(1, 4) Selection.ShapeRange.Height=Cells(1, 4)End Sub

分别设置各插件数据，主要是对形状中心进行定位，并控制速度，重复中心旋转

经验内容仅供参考，如果您需解决具体问题(尤其法律、医学等领域)，建议您详细咨询相关领域专业人士。作者声明：本教程系本人依照真实经历原创，未经许可，谢绝转载。