用于显示Excel单元格的按钮控件

时间:2017-10-28 17:41:15

标签: excel-vba vba excel

我在Excel中创建一个宏,程序语言是Visual Basic for Applications。我打开了Developer选项卡,并在工作表中插入了一个Active X Button控件。我希望它在单元格B2中显示文本,它包含一个格式化为文本的表格标题,文本为:“Client 1”。

这是我到目前为止所拥有的:

Option Explicit

Private Sub CommandButton1_Click()

Dim sTxt As String
sTxt = "Cell B2 has text: "
MsgBox sTxt & Range("B2").Text

但脚本甚至没有编译!可能有什么不对?

1 个答案:

答案 0 :(得分:0)

首先确保您处于设计模式,右键单击按钮并选择查看代码

enter image description here

然后粘贴:

Private Sub CommandButton1_Click()
    Dim sTxt As String
    sTxt = "Cell B2 has text: "
    MsgBox sTxt & Range("B2").Text
End Sub

然后切换设计模式关闭,然后单击按钮:

enter image description here