Outlook’ta Klasör Bölmesi nasıl genişletilir

Ahmet YAŞAR

2 yıl önce

Klasör Bölmesi nasıl genişletilir, outlook’un penceresinin solundaki klasör Bölmesi, tüm klasörlerinizi genişletilmiş görünümünde görüntüler. Kullanıcılar ayrıca bu bölmeyi küçültür. Böylece klasörleri görüntülemez.

Teknoloji Destek Hattı Baş Shake CSS

Fakat kullanıcılar bu Klasör Bölmesini simge durumuna küçültülmüş görünümden yeniden genişlettiğinde, kullanıcılar bunun dışına tıkladığında genişletilmiş olarak kalmaz. Bu nedenle, bazı kullanıcılar, genişletilmiş Klasör Bölmesi görünümünü küçülttükten sonra nasıl sabit tutabileceklerini merak eder.

Klasör Bölmesi nasıl genişletilir yöntemleri hakkında sizi bilgilendirmekteyiz.

Outlook’un Klasör Bölmesini nasıl genişletilmiş halde tutarım?

1.Klasör Bölmesi ayarını yapın

Çünkü klasör Bölmesi ayarını yaparak varsayılan genişletilmiş Klasör Bölmesini geri yükleyebilirsiniz. Bunu yapmak için Görünüm sekmesini seçin.

Ardından aşağıda gösterilen Klasör Bölmesi düğmesine basın.

Teknoloji Destek Hattı Orta Pulse CSS

Normal seçeneğini seçin.

2.Sabitle düğmesine tıklayın

Alternatif olarak, kullanıcılar Klasör Bölmesinin sağ üst köşesindeki raptiye düğmesine tıklar. Küçültülmüş Klasör Bölmesi’ni, üstündeki ok düğmesine (>) tıklayarak genişletin.

Ardından, doğrudan aşağıdaki anlık görüntüdeki raptiye düğmesini tıklayın. Bundan sonra, Klasör Bölmesi, tıkladığınızda açık olarak kalır.

3.Outlook başladığında klasörleri otomatik olarak genişleten bir VBA makrosu kurun

Outlook’u açtığınızda Klasör Bölmesi’ndeki tüm klasörlerin tamamen genişletildiğinden emin olmak gerek. Çünkü uygulama başladığında tüm daraltılmış klasörleri açan bir VBA makrosu seçin. Alt + F11 kısayol tuşuyla Outlook’un Visual Basic for Applications penceresini açın.

Pencerenin solundaki Proje1’e tıklayın.

Çünkü microsoft Outlook Nesneleri’ni genişletin ve bir kod penceresi açmak için ThisOutlookSession’a çift tıklayın.

Bu VBA kodunu Ctrl + C kısayol tuşuyla seçip kopyalayın:

Private Sub Application_Startup()
ExpandAllFolders
End SubPrivate Sub ExpandAllFolders() Hatada
Devam Sonraki
Dim Ns As Outlook.NameSpace
Klasörleri Dim Outlook.Folders
Dim CurrF As Outlook.MAPIFolder
Dim F As Outlook.MAPIFolder
Dim ExpandDefaultStoreOnly As BooleanExpandDefaultStoreOnly = FalseSet Ns = Application.GetNamespace(“Mapi”)
Set CurrF = Application.ActiveExplorer.CurrentFolderIf ExpandDefaultStoreOnly = True Then F Set F
= Ns.GetDefaultFolder(olFolderInbox)
Set
.Folders
LoopFolders Klasörler, True
Else
LoopFolders Ns.Folders, True
End If
DoEvents
Set Application.ActiveExplorer.CurrentFolder = CurrF
End Sub
Private Sub LoopFolders(Folders As Outlook.Folders, _
ByVal bRecursive As Boolean _)
Dim F As Outlook.MAPIFolder
Klasörlerdeki Her F İçin
Set Application.ActiveExplorer.CurrentFolder = F
DoEvents
bRecursive ise O
zaman F.Folders.Count O zaman
LoopFolders F.Folders, bRecursive
End If
End If
Next
End Sub

Bu makroyu Ctrl + V kısayol tuşuyla kod penceresine yapıştırın.Dosya’ya tıklayın ve makroyu kaydedin. Bundan sonra, Outlook’u başlattığınızda makro. Klasör Bölmesi’ndeki daraltılmış klasörleri otomatik olarak açar.

Ayrıca Outlook hesap ekleme nasıl yapılır makalemizi inceleyebilirsiniz.

Teknoloji Destek Hattı Son Shake CSS