onay kutusu ile ilgili soru

[bahakara1923]

Merhaba Üstadlar;

Ekte gönderdiğim dosyada onay kutusu ile ilgili yaşadığım bir sorun var.Gerekli açıklama dosyanın içinde mevcuttur.İlgileriniz için şimdiden teşekkürler.Acil cevap veririseniz çok sevinirim.

Saygılarımla...

 

[edward norton]

Aşağıdaki kodu kullanarak hem 8 ve 9 hem de onay kutusunu gizleyebilirsiniz.

Private Sub CheckBox1_Click()
Rows("8:9").Select
Selection.EntireRow.Hidden = True
CheckBox1.Visible = False
End Sub

 

[edward norton]

Aşağıdaki kod ile kesip yapıştırabilirsiniz.

Rows("8:9").Select
Selection.Cut
Rows("30:30").Select (nereye yapıştırmak istiyorsanız)
ActiveSheet.Paste

 

[bahakara1923]

teşekkürler üstadım ama makrosuz bi çözüm yokmuydu.makro bilgim sıfır.

 

[edward norton]

Onay kutusunu sağ tıklayıp kes-yapıştır yapabilirsiniz.
Önce 8 ve 9. satırları kesip yapıştırın sonra onay kutusunu yapıştırırsınız.böyle olmaz mı

 

[bahakara1923]

ayrıca üstad gizlemeye gizliyo ama onay kutusunu gizlemiyor?

 

[bahakara1923]

öyle yapılıyor.onda sorun yok zaten.ben onu sormak istememiştim.taşı ve boyutlandır deuince kesip yapıştırıo.ama gizlemio .asıl sorun onay kutusunun gizlenmesi?

 

[edward norton]

onay kutusunu makro ile gizlersiniz. başka bir yolu olduğunu sanmıyorum.

CheckBox1.Visible = False

 

[edward norton]

Ekli dosyayı inceler misiniz? İki tane komut butonu ekledim belki işinizi görür

 

[bahakara1923]

Üstadım onay kutusunu gizleyemiyorum.yardımcı olurmusunuz?

 

[bahakara1923]

teşekkürler üstadım.

 

[bahakara1923]

bu düğmelerin boyutunu nası küçülteceğiz?

 

[bahakara1923]

tmm üstad buldum teşekkürler

 

[edward norton]

Gönderdiğim dosyada ben gizleyip gösterebiliyorum.siz neresini yapamadınız

Dosyayı tekrar gönderiyorum.

 

[edward norton]

boyutlarını küçülttüm bir önceki mesajda dosyayı gönderdim.