Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 16562|回复: 9

如何用vba制作浮动按钮?

[复制链接]
发表于 2011-5-18 11:30 | 显示全部楼层 |阅读模式
5学分
浮动按钮.rar (8.58 KB, 下载次数: 362)

发表于 2011-5-18 11:56 | 显示全部楼层
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Me.Shapes(1).Top = ActiveWindow.VisibleRange.Top + 20
  Me.Shapes(1).Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - 200
End Sub
回复

使用道具 举报

发表于 2011-5-18 11:57 | 显示全部楼层
回复

使用道具 举报

发表于 2011-5-18 12:52 | 显示全部楼层
窗体可以,将按钮放在窗体里就可以间接的实现了.
回复

使用道具 举报

发表于 2011-5-18 15:06 | 显示全部楼层
回复 心灵有约 的帖子

Fx.rar (91.81 KB, 下载次数: 476)
回复

使用道具 举报

 楼主| 发表于 2011-5-18 15:32 | 显示全部楼层
回复 HYY514 的帖子

见附件。浮动按钮系插入的表单控件(按钮(窗体控件)),其被点击后执行某个宏,但按钮必须随滚动条的移动而移动,以便使其始终可见。
回复

使用道具 举报

发表于 2014-3-27 15:41 | 显示全部楼层
HYY514 发表于 2011-5-18 15:06
回复 心灵有约 的帖子

这个窗体能否设置成自由拖动就是用户能根据习惯或许要用鼠标对窗体进行拖动,并且拖动的范围控制在数据编辑区域范围内?如果有隐藏(最小化)和显示(复原)切换功能就更加完美了,希望指教,非常感谢,虽然目前还看不懂代码的含义!
回复

使用道具 举报

发表于 2015-9-27 13:18 | 显示全部楼层
本帖最后由 poche12345 于 2015-9-27 13:20 编辑

我的这个也不支持缩放

浮动按钮.rar

12.96 KB, 下载次数: 160

回复

使用道具 举报

发表于 2015-9-27 13:26 | 显示全部楼层
这个是某大大的作品,可以浮动,同时还支持缩放,但是貌似听说会妨碍其他工作,楼主可以试试

(不推荐,会妨碍其他工作)Book如何制作浮动按钮.rar (12.03 KB, 下载次数: 221)
回复

使用道具 举报

发表于 2020-9-25 10:35 | 显示全部楼层
HYY514 发表于 2011-5-18 15:06
回复 心灵有约 的帖子

请问一下能不能说明一下代码的含义?
纯小白,完全看不懂,没法修改成自己需要的样子
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-4-27 21:33 , Processed in 0.408112 second(s), 9 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表