Excel vba窗体最小化最大化无边框的设置代码
时间:2023-07-19 18:33:40
文章介绍vba窗体最小化最大化无边框的设置代码,并提供excel附件供测试和学习。
我们使用excel中VBA制作的窗体,默认是没有最小化、最大化等等命令的。本文就详细介绍一下vba窗体最小化最大化等按钮添加方法。
用API实现VBA窗体最小化最大化按钮、无边框等。
使用API设置窗体格式,经过简化仅需要两个API函数,省略了常数和GetWindowLong函数。
注意:SetWindowLong 的最后一个参数,在窗体显示时和在窗体加载时(UserForm_Initialize事件)调用,其值有差异,但有规律可循。
下面语句是在窗体已经显示后调用的,其最后一个参数为 &H16040000,是一个16进制数值。如果要在窗体加载时调用则需要去掉首位的1, 为&H6040000。
为了方便测试和学习,我们使用excel制作了源文件,大家下载可以查看具体的关于vba窗体最小化最大化无边框的设置代码。
标签:最大化,最小化,窗体,边框,Excel函数
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
windows10为什么总是强制更新?
2022-10-27 01:59:56
![](https://img.aspxhome.com/file/2023/26/a222392_0s.jpg)
win11更新一直正在重新启动怎么解决?两种方法教给你!
2022-10-09 07:25:06
![](https://img.aspxhome.com/file/2023/30/a268791_0s.png)
QQ旋风图标怎么关闭?关闭QQ旋风图标的方法
2022-09-30 15:16:27
![](https://img.aspxhome.com/file/2023/9/a340841_0s.jpg)
Excel中表格求平均数的操作方法
2023-09-07 23:59:26
word如何插入换行符
2022-03-03 23:44:58
![](https://img.aspxhome.com/file/2023/1/35081_0s.png)
正在扫描和修复驱动器已完成100%要多久 怎么修复?
2022-06-02 11:04:17
![](https://img.aspxhome.com/file/2023/26/a221940_0s.jpg)
cad模型怎么导入布局
2022-03-16 21:16:43
![](https://img.aspxhome.com/file/2023/30/a262530_0s.png)
2015年职称计算机科目word2003考点精选
2023-12-06 15:18:45
Gravit Designer Mac快捷键有哪些?Gravit Designer mac使用技巧
2022-11-13 00:11:00
![](https://img.aspxhome.com/file/2023/7/a213907_0s.png)
wps表格如何打百分数
2023-10-06 20:57:05
Pixelmator Pro 教程「176」,如何在 Pixelmator Pro 中关闭或删除图层样式?
2022-01-15 02:03:05
![](https://img.aspxhome.com/file/2023/10/a344005_0s.jpeg)
系统故障转储怎么消除?消除系统故障转储的方法
2022-09-26 16:29:44
![](https://img.aspxhome.com/file/2023/6/a322769_0s.png)
电脑风扇转速怎么调?电脑风扇转速控制的方法
2023-12-26 21:40:25
![](https://img.aspxhome.com/file/2023/1/a273967_0s.png)
excel2003排序的教程全解
2022-02-08 12:34:18
Windows11怎么完全汉化?Windows11彻底汉化教程来了!
2022-08-22 17:59:59
![](https://img.aspxhome.com/file/2023/27/a238784_0s.png)
怎样删除win8中无用的网络连接(借助注册表来完成)
2022-11-07 22:30:33
重装系统会把C盘的文件清空吗?
2023-07-15 22:15:05
![](https://img.aspxhome.com/file/2023/6/a322063_0s.jpg)
让PowerPoint文档中的数据图表动起来
2022-07-12 06:27:13
![](https://img.aspxhome.com/file/2023/10/a348575_0s.jpg)
excel服务器
2023-08-08 10:26:36
![](https://img.aspxhome.com/file/2023/1/a167891_0s.png)
Word怎么给文字加边框呢?
2022-06-12 18:25:08
![](https://img.aspxhome.com/file/2023/3/23983_0s.jpg)