• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Satır Gizleme Sorunu

Katılım
9 Aralık 2004
Mesajlar
62
Excel Vers. ve Dili
excel 2003
Merhabalar ben işyerimde kullanmak üzere basit bir puantaj tablosu hazırladım. Bu forumdan faydalanarak bazı makrolar ile destekledim. Yazıcı çıktısı alırken gereksiz satırların görünmemesi ve yazdırılmaması, yazma işlemi bittikten sonra ise eski haline gelmesi ile ilgili sorunu aşamadım. Daha detaylı açıklayacak olursam AN8:AN403 aralığındaki değer 1 ile 31 arasında ise satır görüntülensin,bu aralıktaki değer 1 ile 31 değerinden farklı ise yani boşsa veya herhangi bir rakam,harf varsa gizlensin istiyorum. Örnek dosya ektedir.
Yardımlarınızı bekler saygılar sunarım.
 

Ekli dosyalar

"puantajyazdır" makrosu başına aşağıdaki kodu ekleyin.
Kod:
For i = 8 To 403
    If Cells(i, "an") >= 1 And Cells(i, "an") <= 31 Then
        Rows(i).Hidden = False
    Else
        Rows(i).Hidden = True
    End If
Next
 
Yardımınız için teşekkürler.
 
Geri
Üst