你几乎就在那里 ActiveSheet.Shapes("Button 1")
如果您dim将变量设为as Shape并为其指定按钮,则可以使用intellisence来探索可用属性.从那里,你会发现.Height,.Width,.Left,.Top
Dim btn As Shape
Set btn = ActiveSheet.Shapes("Button 1")
btn.Height = 50
btn.Width = 100
Run Code Online (Sandbox Code Playgroud)