Excel VBA 更改按钮大小和位置

Question

我该如何在Excel表格中更改按钮的大小和位置？

- Steven

---

我唯一发现的是添加一个按钮。我也找到了ActiveSheet.Shapes("Button 1")，但无法让它工作。 - Steven

为什么这篇帖子被踩了？如果你要踩某个人，请解释一下你的理由。我们在这里的原因是互相学习，相互提高。 - PowerUser

Answer 1

你离完成 ActiveSheet.Shapes("Button 1") 已经很接近了。

如果你将一个变量声明为Shape 并将按钮分配给它，你可以使用智能提示探索可用的属性。从那里，你会找到 .Height、.Width、.Left 和 .Top。

Dim btn As Shape
Set btn = ActiveSheet.Shapes("Button 1")
btn.Height = 50
btn.Width = 100

- chris neilsen

---

高度和宽度的单位是点。https://learn.microsoft.com/zh-cn/office/vba/api/excel.shape.left?source=recommendations - user10186832

有关点、twips和毫米的更多详细信息，请访问https://davetallett26.github.io/makeform.html。 - user10186832

Answer 2

Steven，如果你想学习Excel中基础的VBA编程，我推荐你尝试使用录制宏选项。这个选项的位置会因你使用的Excel版本不同而异（例如在2007版中，你需要在功能区激活开发人员选项卡）。

打开该按钮后，使用标准菜单完成你想要实现的操作（例如创建自定义大小的按钮）。最后停止录制并查看自动生成的代码。

- PowerUser

---

很好的提示，但我只看到记录宏上的.ScaleWidth而没有.Width。 - TCN

你是正确的。我必须亲自尝试一下。由于某种原因，宏录制器只记录缩放按钮大小的命令。它不会记录大小的绝对更改。请使用@chris neilsen的答案。 - PowerUser