下拉框启用按钮

由于公司的媒体政策，我无法粘贴代码。我花了数周时间浏览网络，寻找我遇到的以下障碍。由于这是我第一次VBA代码，我终于坚持下拉框启用按钮

我所拥有的是4个选项的下拉框：

一个选项让button13（或按钮名称在这种情况下“值班” ）可见或启用，其他3个什么都不做。

我试图
```
if range (“b4”) = “on duty” then 
     Button13.enabled = true and tried (name.enabled = true) 
    Else 
     Button13.enabled = false (name.enabled = false) 
```
上（表Sheet 1）与4个选项与他们的2不同的下拉框我需要有起来上面行到不同（Sheet 2中），因为这碾过24小时的时间内，我一直在使用Now date format但需要对now date在update的time（Sheet1中）

所有我已经能够到目前为止发现是公式自动更新，并作为THI s是基于下拉框而不是用户表单。如果B4

2015-11-19 Drag00n

我不与任何其他部分，我已经写了代码后帮。我需要的帮助是，代码是什么。由于我找不到那个信息 – Drag00n

嗨Davesexcel，是的，我确实尝试过。即使我已经读过，按钮并不是真的能够隐藏，CommandButtons可以但CommandButton没有运行我设置的宏和按钮。这就是为什么我卡住 – Drag00n

隐藏表单按钮=“值班”

Sub HideButton2() 
    If Range("B4") = "on duty" Then 
     ActiveSheet.Shapes("Button 2").Visible = False 
    Else 
     ActiveSheet.Buttons("Button 2").Visible = True 
    End If 
End Sub

来源

2015-11-19 15:29:37 Davesexcel

谢谢Davesexcel，这是完美的。稍微编辑一下，我就完全一样了。感谢堆 – Drag00n

不，我不能将它标记为已回答 – Drag00n

是的，对不起刚刚完成12小时轮班 – Drag00n

下拉框启用按钮

回答

相关问题