userformdaki checkbox isaretiyle satır saklama ?

cems

Altın Üye
Katılım
2 Eylül 2005
Mesajlar
2,486
Excel Vers. ve Dili
office 2010 tr 32bit
Altın Üyelik Bitiş Tarihi
13-06-2029
Bu saatte kafa durdu ..

Ustadlar belki de cok basit ama ekteki dosyamda bir sayfadaki satırları
userforma yerlestirilmis (satırlardaki degisken adları capture ederek ceken isim alan )checkboxların birini ya da herhangi birkacını isaretleyip kapat'a basarak saklamak icin

Private Sub saklayici()

If UserForm1.Controls("CheckBox1" & X).Value = True Then
Sayfa1.Rows("32:32").Select
Selection.EntireRow.Hidden = True
End If

If UserForm1.Controls("CheckBox1" & X).Value = False Then
Sayfa1.Rows("32:32").Select
Selection.EntireRow.Hidden = False
End Sub

seklinde bir makro yapmaya calıstım ama nerde hata yapıyorsam runtime9 dan bi turlu sıyrılıp , ozetle "satır saklatamadım.Saklatamadıgım icin de sayfadan cıkarken hepsini tekrar actırmak icin makroya da egilemedim.Sayfadaki isimler ,baska sayfaların durumlarına gore degisiyor, sabit degil. Bu birinci problem oldu .İkincisi , aynı sekilde
sutun saklatıp yine sayfadan cıkarken actırmak da gerekiyor.
Sayfadan cıkaran commandbutton sayfanın uzerinde , satır sutun saklanarak yeniden sekillenerek basım aldıktan sonra bu cıkıs anında duzenin yine basa donmesi icin ne duzeltmem gerekiyor.

Eger onemli bi ayrıntı ise, checkbox adları uzerine attıgım labeller sayfadaki isimleri capture ediyor.
 
Katılım
3 Mart 2005
Mesajlar
571
Excel Vers. ve Dili
Excel 2000 Ing.
Sayfa1.Rows("32:32").Select

bu kullanım yanlış

Sheets("Sayfa1").Rows("32:32").Select

şeklinde kullanılmalı
 

Seyit Tiken

Uzman
Uzman
Katılım
23 Ağustos 2005
Mesajlar
4,651
Excel Vers. ve Dili
Excel : 2010
Bu şekilde bir kodu deneyin.

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
CheckBox1.Caption = "Satır Gizlendi"
[A15].Rows.Hidden = 1
Else
CheckBox1.Caption = "Satır Gösterildi"
[A15].Rows.Hidden = 0
End If
End Sub
 

cems

Altın Üye
Katılım
2 Eylül 2005
Mesajlar
2,486
Excel Vers. ve Dili
office 2010 tr 32bit
Altın Üyelik Bitiş Tarihi
13-06-2029
userformda checkbox isareti ile sayfada satır saklatma

Sayın Seyit Tiken

İkazlarınızla ortalık duzeldi ve ortaya istedigim gibi hareket eden bir userform islevi cıktı. Ornekte ;sayfa2 den sayfa1e kopya olarak gelen verilerden işe "baskı alırken"yaramayacakları cıkarmak icin bir userform ustunde checkboxlar var ve isaretli olup olmamasına gore de alt tuslar vasıtasıyla satır saklıyor. Sutun saklama da benzer sekilde duzenlenebilir ama bu formda sutun saklama yok .

Hem size tesekkur etmek istedim hem de biten calısmayı alta baglayıp isteyen arkadasın kullanımına acmak.

Cok sagolun
 
Üst