有没办法让按钮横竖拉都不变

吴虾咪

smsn

一般右击-控件格式内会有。

TuskAi

右键按钮，选择属性，然后选择大小、位置均固定

吴虾咪

TuskAi 发表于 2022-11-18 20:39
右键按钮，选择属性，然后选择大小、位置均固定

我意思是可以下拉或右拉还在那个位置，而不是拉下来就看不到了。

TuskAi

吴虾咪 发表于 2022-11-18 20:50
我意思是可以下拉或右拉还在那个位置，而不是拉下来就看不到了。

你说的这种需求，我通常的解决方式是在workbook.open里加个在功能区创建菜单的代码，用菜单里的按钮调用宏，你可以参考一下

1. Private Sub Workbook_Open()
   
2. 
   
3. With Application.CommandBars("standard").Controls.Add
   
4.     .Style = msoButtonCaption
   
5.     .Caption = "按钮1"
   
6.     .OnAction = "模块1.Macro1"
   
7.    
   
8. End With
   
9. With Application.CommandBars("standard").Controls.Add
   
10.     .Style = msoButtonCaption
    
11.     .Caption = "按钮2"
    
12.     .OnAction = "模块1.Macro2"
    
13.    
    
14. End With
    
15. End Sub
    
16. Private Sub Workbook_BeforeClose(Cancel As Boolean)
    
17. 
    
18. Application.CommandBars("standard").Reset
    
19. 
    
20. End Sub
    

复制代码

gwjkkkkk

这样？？？

吴虾咪

gwjkkkkk 发表于 2022-11-18 22:47
这样？？？

不是，类似悬浮一样，按钮跟随着下拉移动。网站都找了好像都没办法。感谢老师

吴虾咪

TuskAi 发表于 2022-11-18 21:33
你说的这种需求，我通常的解决方式是在workbook.open里加个在功能区创建菜单的代码，用菜单里的按钮调用 ...

可以但在加载上领导会不习惯的。感谢老师帮助.麻烦了。辛苦了