Excel'de bir açılır listedeki tüm seçenekleri nasıl yazdırabilirim?

Hiç bir Excel çalışma sayfasındaki açılır listedeki tüm seçenekleri yazdırmayı denediniz mi? Bu makale, bir açılır listedeki tüm seçenekleri Excel'de ayrı bir çıktıya yazdırmaktan bahsediyor.

VBA kodu ile bir açılır listedeki tüm seçenekleri yazdırın

VBA kodu ile bir açılır listedeki tüm seçenekleri yazdırın

Aşağıdaki VBA kodu, çalışma sayfasındaki bir açılır listedeki tüm seçenekleri yazdırmanıza yardımcı olabilir. Lütfen aşağıdaki işlemleri yapın.

1. Tuşuna basın. Ara Toplam + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

2. içinde Uygulamalar için Microsoft Visual Basic pencere, lütfen tıklayın Ekle > modül. Ardından aşağıdaki VBA kodunu Modül penceresine kopyalayın. Ekran görüntüsüne bakın:

VBA kodu: Belirli bir açılır listedeki tüm seçenekleri ayrı çıktıya yazdırın

Sub Iterate_Through_data_Validation()
    Dim xRg As Range
    Dim xCell As Range
    Dim xRgVList As Range
    Set xRg = Worksheets("Sheet1").Range("B8")
    Set xRgVList = Evaluate(xRg.Validation.Formula1)
    For Each xCell In xRgVList
        xRg = xCell.Value
        ActiveSheet.PrintOut
    Next
End Sub

not: Kodda, Sayfa1, yazdırmak istediğiniz açılır listeyi içeren çalışma sayfası adıdır. Ve B8, hücre açılır listeyi içerir. Lütfen bunları ihtiyaç duyduğunuzla değiştirin.

3. Tuşuna basın. F5 kodu çalıştırmak için anahtar.

Ardından, belirli bir çalışma sayfasındaki belirtilen açılır listedeki tüm seçenekler ayrı olarak yazdırılır.

İlgili Makaleler:

• Excel açılır listesindeki değerleri seçerken diğer hücreleri otomatik olarak nasıl doldurabilirim?
• Excel açılır listesine yazarken otomatik tamamlama nasıl yapılır?
• Excel'de bir açılır liste takvimi nasıl oluşturulur?
• Excel'de aranabilir bir açılır liste nasıl oluşturulur?
• Excel'de birden çok seçim veya değer içeren açılır liste nasıl oluşturulur?