VBA更改Activex按钮的名称

Question

我不确定，即使这是可能的。我想在点击时更改按钮的名称。

我有Active X按钮，可以在单击时启用工作表上的单元格。 “启用工作表”按钮的名称。

一旦启用，他应该会看到一个“禁用工作表”按钮。请指教。

Answer 1

假设您的按钮以“CommandButton1”命名：

const mapStateToProps = (state) => ({
  model: services.model.selector.getSelected(state),
  build: services.build.selector.getLastBuild(state),
  recommendations: services.recommend.selector.getRecommendations(state)
})

在OP的评论后编辑

Private Sub CommandButton1_Click()
    With Me.OLEObjects("CommandButton1").Object
        .Caption = IIf(.Caption = "Enable Sheet", "Disable Sheet", "Enable Sheet")
    End With
End Sub

Answer 2

在可以附加到ActiveX对象的代码中，您可以尝试这样的事情：

Private Sub CommandButton1_Click()
 Me.CommandButton1.Caption = "Enable"
End Sub

通常，对于ActiveX对象，您可以使用.Caption属性更改显示的文本。