CheckBox satır gizle göster.

[tekkral.cihan]

CheckBox ile d8:d47 hücrelerinde sıfır yada boş hücre var ise satırı gizlesin başka veriler varsa satırları göstersin yardımcı olursanız sevinirim.

 

[BedriA]

Sub gizle()
For i = 8 To 47
If Range("d" & i) = "" Or Range("d" & i) = 0 Then

Range("a" & i).Select

Selection.EntireRow.Hidden = True
End If
Next i
End Sub

Sub goster()
For i = 8 To 47
Range("a" & i).Select

Selection.EntireRow.Hidden = False
Next i
End Sub

 

[tekkral.cihan]

çalışmadı hocam kodlar

 

[BedriA]

çalışmadı hocam kodlar

Örnek dosya ekler misiniz?

dosya.co ve dosya.tc sitelerinden birinden ekleyebilirsiniz.

Kodlar bende çalışıyor. Demek ki dosyalar da bir değişkenlik var.

 

[tekkral.cihan]

http://dosya.co/ji8scfdsvc82/Yeni_Microsoft_Excel.xlsm.html

 

[BedriA]

http://dosya.co/ji8scfdsvc82/Yeni_Microsoft_Excel.xlsm.html

Dosyanızı buradan indirip deneyebilirsiniz.
Kodları da yazdım yukarıya.

 

[tekkral.cihan]

Yardımcı olduğunuz için Çok sağolun hocam tam istediğim gibi oldu.

 

[BedriA]

Yardımcı olduğunuz için Çok sağolun hocam tam istediğim gibi oldu.

Rica ederim.
Sınav analiz programı yapmaya giriş yapmışsınız sanırım.

 

[tekkral.cihan]

Beden eğitimi öğretmeniyim ölçme değerlendirme programı yaptım hocam ona uğraşıyorum bitti gibi

 

[BedriA]

Beden eðitimi öðretmeniyim ölçme deðerlendirme programý yaptým hocam ona uðraþýyorum bitti gibi

Elinize saðlýk.