如何在Excel中创建滑动菜单效果
发布时间:2023-05-09 01:03:08
如何在Excel中创建滑动菜单效果?我们经常在网站中能看到奇妙的滑动菜单效果:当鼠标放置在某处时,菜单自动展开,当鼠标离开时,菜单收起。其实,在Excel中也能创建类似的效果,Bacon Bits教给我们一个实现方法,具体内容见原文:Creating a Slide-Out Menu in Excel。
这里,只是列出其精华部分,即如何创建下面动画所示的滑动效果。
当反复单击左上方三条横线时,列A会逐渐变宽或收窄,从而摸拟了滑动效果。
实现的关键是下面的代码:
Sub HideSlicer()
Dim ColumnRange As String
Dim SmallestSize As Double
Dim LargestSize As Double
Dim Increment As Double
Dim FromSize As Double
Dim ToSize As Double
Dim Stepper As Double
Dim i As Double
ColumnRange = “A” ‘<–修改为你想取得滑动效果的列
SmallestSize = 8 ‘<–调整为你需要的最小列宽
LargestSize = 32 ‘<–调整为你需要的最大列宽
Increment = 6 ‘<–调整来设置动画的快慢
Select Case ActiveSheet.Columns(ColumnRange).ColumnWidth
Case Is <= SmallestSize
FromSize = SmallestSize
ToSize = LargestSize
Stepper = Increment
Case Is > SmallestSize
FromSize = LargestSize
ToSize = SmallestSize
Stepper = -Increment
End Select
For i = FromSize To ToSize Step Stepper
ActiveSheet.Columns(ColumnRange).ColumnWidth = i
i = i
DoEvents
Next i
End Sub
猜你喜欢
- 如果word文档设计到商业秘密,个人隐私,可以通过设置密码的方式来保护文档?下面小编给大家简单的介绍一下步骤:第一步:点击【文件】点击【保护
- word怎么插入gif动图?word文件中想要插入动图,并让动图动起来,该怎么操作呢?下面我们就来看看word中让gif动图动起来的教程,需
- 最近一直有人问word中如何统计字数,这应该是一个再简单不过的问题了,可为什么还有好多人不知道呢,那么word字数统计在哪里?如何使用wor
- PPT如何转换成Word方法一、使用pptConverttodoc软件将PPT转换成Word①首先 点击下载 该软件,然后解压后双击运行“p
- 在使用Word时中使用过一些小技巧,发现很不错,对文字处理方面很有帮助在使用Word时中使用过一些小技巧,发现很不错,对文字处理方面很有帮助
- 当我们遇到由于误操作或者使用不当发生系统故障问题的时候,可以先试试使用命令提示符修复电脑系统,如果实在不行,再重装系统,毕竟重装系统是件麻烦
- 小贾碰到了一个难题,事先编辑好的一张Excel表格,恰好容纳在一张B4纸上,现在需要将纸型改为A4,但仍要打印在一张纸上,这可让小贾犯难了。
- win10家庭版关闭自动更新为什么还是会恢复更新?当我们将win10家庭版的自动更新改为禁用之后,发现还是会恢复更新,这是为什么呢,win1
- Win10对比win7系统合并精简了某些功能,比如版本信息等,虽然很多时候版本信息对用户来说没有需求,但是在某些情况下还是要知道了解的,那么
- 对于快递统计来说,因为每个快件的到达地点都不同,因此收费也会不一样,这期介绍一个快捷的方法,帮助快递统计员用EXCEL快速统计各地的邮费1、
- 可以在打印对话框中设置,其具体的操作步骤:1、单击窗口中左上角的office按钮,在下拉菜单中选择打印命令;2、弹出打印对话框,在按纸张大小
- 在word插入扇形统计图的方法:你可在常用工具栏中点击“插入EXCEL工作表”按钮,然后在表中输入数据,选中数据区域,然后点击常用工具栏中的
- office正在更新,一直不动win+R输入services.msc箭头的服务,重新启动office正在更新,一直不动
- Word文档是一款非常实用的办公软件,很多小伙伴们在工作、学习生活中都会使用到该软件。在Word文中编辑文字时,我们有时候会发现输入空格后会
- 有时候同一份Excel表格需要几种不同的显示格式。比如工资记录表,财会人员在处理时可能需要同时显示人员的职称、等级等相关信息,但在打印出来给
- valorant是一款第一人称的射击游戏,它是由拳头公司开发的免费多人游戏,中文名叫做无畏契约,很多用户都很喜欢这款游戏,但是在自己下载的时
- 个人所得税的计算看起来比较复杂,似乎不用VBA宏编程而只用公式来计算是一件不可能的事。其实,Excel提供的函数公式不但可以计算个人所得税,
- 利用Excel制作的电子表格,默认情况下是没有边框的,通过预览就可以看到,如图1所示。不过,用户可以根据需要手动设置表格边框和底纹。 &nb
- 给表格添加边框和底纹,可以起到美化表格的作用,如何在Word2003文档中给表格设置边框和底纹。今天,小编就教大家在Word2003中文档设
- 在Word中怎么给图片插入艺术字?这是关于Word里面生成艺术字和插入图片的,这也是一些办公室的编辑人员经常用到的操作,下面小编就为大家详细