[belajar-excel] Enable dan Disable button [1 Attachment]

[Tio Adi Bayu Adjie tio.ad...@ptssb.co.id [belajar-excel]]

Salam B-Exceller

Saya punya button yg messagenya “Welcome”. Saya mau mematikan button itu 
sehingga tidak bisa diclik. Tapi code yang saya buat , tidak berhasil- 
berhasil. Mohon bantuaannya. File terlampir

Sub disablebutton_Click()
ActiveSheet.Shapes("Button 2").ControlFormat.Enabled = False
ActiveSheet.Shapes("Button 2").DrawingObject.Font.ColorIndex = 16
End Sub

Sub welcome_Click()
MsgBox "WELCOME"
End Sub

Sub enablebtn_Click()
ActiveSheet.Shapes("Button 2").ControlFormat.Enabled = True
ActiveSheet.Shapes("Button 2").DrawingObject.Font.ColorIndex = 1

End Sub

Terima kasih atas bantuannya. Semoga amal baiknya dilipatgandakan oleh Allah 
SWT.
Salam
Tio

Enable dan Disable Button.xlsm
Description: Enable dan Disable Button.xlsm