Tab Rengine Gore Sayfalari Saklama

colors

Merhaba, Tab renklerine gore sayfalari saklayabilmek icin asagidaki kodu kullanabilirsiniz, ben kirmizi icin bir ornek sectim;

Sub hide_unissued_sheets()

Dim ws As Worksheet
For Each ws In ActiveWorkbook.Sheets
    If ws.Tab.ColorIndex = 3 Then
    ws.Visible = xlSheetHidden
    Else: ws.Visible = xlSheetVisible
    End If
Next
End Sub

Yazar: mmustafaaslan

2004 yilindan itibaren ozel bir sirketin finans departmaninda calismaktadir. Kendini excel, visual basic kullaniminda gelistirmis olan yazarimiz; Meslegi geregi SAP konusunda ileri derecede bilgilidir.

Bir Cevap Yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir


3 + 8 =