下拉框啓用按鈕

由於公司的媒體政策，我無法粘貼代碼。我花了數週時間瀏覽網絡，尋找我遇到的以下障礙。由於這是我第一次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

下拉框啓用按鈕

回答

相關問題