CommandButtonu pasif hale getirme.

[serdarca]

CommandButton tuşuna birkere tıkladığımız zaman tuş pasif hale gelip atamış olduğum makroyu çalıştırmayacak ve çalışma kitabım kaydedilip kapatılıp açıldığı zaman tekrar aktif hale gelecek. Acaba böyle birşey olabilirmi. Herkeze hayırlı ramazanlar dilerim.

 

[Levent Menteşoğlu]

Commandbuttonun sayfa üzerinde olduğunu kabul edersek aşağıdaki kodu butona kopyalayın.

Private Sub CommandButton1_Click()
CommandButton1.Enabled = False
End Sub

 

[serdarca]

Hocam teşekkür ederim fakat dosyayı kaydedip tekrar açtıktan sonra commandbutonun aktif hale gelmesini istiyorum.

 

[Ali]

fakat dosyayı kaydedip tekrar açtıktan sonra commandbutonun aktif hale gelmesini istiyorum.

Bir modüle aşağıdaki kodları ekleyin.

Sub auto_open()
Sheets("sayfa1").CommandButton1.Enabled = True
End Sub

 

[serdarca]

Yalnız sayfanın içerisinden 15 tane commandbuton var hepsine tek tek modül atamaktansa tek bir modülle hepsini tekrar aktif hale getiremezmiyiz

 

[Ali]

Tek tek ayrı modüle atmayacaksınız hepsini Sub auto_open() modülünün içine yazacaksınız.

 

[serdarca]

Anladım teşekkür ederim Allah kolaylık versin