renkli satırın yazıdan çıkmaması

[nurcan2004]

merhabalar;

formda arama yaptım ama istediğim gibi sonuç bulamadım,renkli işaretlenen satırın yazıdan çıktı alınırken renklenmiş satırın çıkmasını (yani satır tamamen silinsin) istemiyorum...

 

[YUSUF44]

Taslak kalitesiyle ilgili açıklamaları inceleyiniz:

http://office.microsoft.com/tr-tr/excel-help/HP010254124.aspx

 

[nurcan2004]

yusuf bey çok özür dilerim ama bundan birşey anlamadım...

 

[YUSUF44]

Sayfa yapısından, çalışma sayfasının özelliklerinden Taslak Kalitesi'ni işaretlerseniz renkli kısımlar yazdırılmaz. siz yine de bir deneme yapınız.

 

[nurcan2004]

hayır anlatamadım sanırım...ben sarı renkli olan satırın tamamen yazıda görünmemesini istiyorum...örnek ekliyorum...

 

[YUSUF44]

o konu beni aşıyor maalesef

 

[asuzen]

Dener misiniz?

Sub Asuzen()

   Application.ScreenUpdating = False
    If Range("c1") > 0 Then
    Rows("1:1").Select
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
    Else
    Range("C1").Select
    End If
    Selection.AutoFilter
    Range("C1").Select
    Selection.AutoFilter
    ActiveSheet.Range("$A$1:$C$31").AutoFilter Field:=3, Operator:= _
    xlFilterNoFill
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
    IgnorePrintAreas:=False
    ActiveSheet.ShowAllData
    Rows("1:1").Select
    Selection.Delete Shift:=xlUp
    Range("a1").Select
    Application.ScreenUpdating = True

End Sub

 

[nurcan2004]

valla harikasınız nedim...çok teşeşürler...kod işime yaradı...

 

[asuzen]

valla harikasınız nedim...çok teşeşürler...kod işime yaradı...

Rica ederim.
Kolay gelsin...