• DİKKAT

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

Satır gizlemeyi iki koşula bağlamak

Katılım
10 Kasım 2006
Mesajlar
1,288
Excel Vers. ve Dili
Excel-2016
Değerli Arkadaşlar, iyi çalışmalar dileğiyle; Şu ifadeyi makroya çevirebilir miyiz.?

Eğer; C sütunu 22 piksel (dahil) den küçükse
ve hemde
A11, sıfırdan küçükse
11.nci satırı gizlesin..
 
Değerli Arkadaşlar, iyi çalışmalar dileğiyle; Şu ifadeyi makroya çevirebilir miyiz.?

Eğer; C sütunu 22 piksel (dahil) den küçükse
ve hemde
A11, sıfırdan küçükse
11.nci satırı gizlesin..

Ekli kodları denermisiniz.

Kod:
If Columns("E:E").ColumnWidth =< 2.43 And Cells(11, 1).Value < 0 Then
    Rows(11).Hidden = True
    End If
 
Sn.Huseyinkis..! Yukarıdaki kodu, Yani;
If Columns("C:C").ColumnWidth <= 22 And Cells(11, 1).Value < 0 Then
Rows(11).Hidden = True
End If
şekliyle çalıştırmaya çalıştım, olmadı. Hatta boş bir dosyada düğmeye atayarak da denedim, yine çalışmadı..Acaba nerede hata yapıyorum..
 
Bu şekilde denediniz mi ?

If Columns("C:C").ColumnWidth <= 2.43 And Cells(11, 1).Value < 0 Then
Rows(11).Hidden = True
End If
 
alternatif:

Kod:
Sub koşullu_gizle()

Rows(11).Hidden = Columns("C").ColumnWidth <= 2.43 And Cells(11, 1).Value < 0

End Sub
 
Sn.Huseyinkis..! Yukarıdaki kodu, Yani;
şekliyle çalıştırmaya çalıştım, olmadı. Hatta boş bir dosyada düğmeye atayarak da denedim, yine çalışmadı..Acaba nerede hata yapıyorum..

birde ekteki gibi denermisiniz. çalışma yaptığınız sayfa gizleme yapacağınız sayfadan farklı ise problem yapıyor olabilir. s1=Sheets("Sayfa1") kısmını sizin gizleme yapıcağınız sayfa ismini yazın.

Kod:
Sub gizle()
Set s1 = Sheets("Sayfa1")
If s1.Columns("C:C").ColumnWidth <= 2.43 And s1.Cells(11, 1).Value < 0 Then
s1.Rows(11).Hidden = True
End If
End Sub
 
Arkadaşlar..! Yukarıda ilgilenen her arkadaşa tek tek teşekkürler.. Kodların hepsi de çalıştı. Fakat şöyle; kodun "Cells(11, 1).Value < 0" satır kısmında, "<" parametresini "=" yapınca çalıştı. Sebebini hiç araştırmadım. Çünkü bu şekilde de işimi eksiksiz gördü..
 
Son düzenleme:
A11 hücresindeki değer 0 ise veya hücre boş ise o şekilde çalışır.

eğer -5 gibi bir değer olsa idi <0 için de çalışırdı

hata kodlarda değil, koşulun sağlanmamasında imiş demek ki.

tasarımı dikkatli yapmamız gerektiğine bir örnek daha...
 
Geri
Üst