• DİKKAT

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

Soru ComboBox İle Koşula Göre Yazdırmak

Katılım
29 Aralık 2012
Mesajlar
30
Excel Vers. ve Dili
Microsoft 365
Merhaba Arkadaşlar,
Aşağıda yer alan örnekteki gibi 3 adet ComboBox değeri için "Evet" ise Label içerisindeki yazan değerlerin görünür olmasını sağlayabiliyorum. Peki değer "Evet" ise sırasıyla Label1, Label2 ve Label3 değerlerini Sayfa 1 içerisinde alt alta nasıl yazdırabilirim?

Kod:
Private Sub ComboBox1_Change()

    If ComboBox1.Value = "Evet" Then
    
        Label1.Visible = True
        
        Else
        
        Label1.Visible = False
        
    End If
    
End Sub

Private Sub ComboBox2_Change()

    If ComboBox2.Value = "Evet" Then
    
        Label2.Visible = True
        
        Else
        
        Label2.Visible = False
        
    End If
    
End Sub

Private Sub ComboBox3_Change()

    If ComboBox3.Value = "Evet" Then
    
        Label3.Visible = True
        
        Else
        
        Label3.Visible = False
        
    End If
    
End Sub
 
Merhaba Arkadaşlar,
Aşağıda yer alan örnekteki gibi 3 adet ComboBox değeri için "Evet" ise Label içerisindeki yazan değerlerin görünür olmasını sağlayabiliyorum. Peki değer "Evet" ise sırasıyla Label1, Label2 ve Label3 değerlerini Sayfa 1 içerisinde alt alta nasıl yazdırabilirim?

Kod:
Private Sub ComboBox1_Change()

    If ComboBox1.Value = "Evet" Then
   
        Label1.Visible = True
       
        Else
       
        Label1.Visible = False
       
    End If
   
End Sub

Private Sub ComboBox2_Change()

    If ComboBox2.Value = "Evet" Then
   
        Label2.Visible = True
       
        Else
       
        Label2.Visible = False
       
    End If
   
End Sub

Private Sub ComboBox3_Change()

    If ComboBox3.Value = "Evet" Then
   
        Label3.Visible = True
       
        Else
       
        Label3.Visible = False
       
    End If
   
End Sub

Ekli dosyayı inceler misiniz, bu şekilde mi bir çözüm istiyordunuz?

iyi akşamlar.
 

Ekli dosyalar

Merhaba Tamer Bey,
Yardımınız için çok teşekkür ediyorum ancak ekteki dosyayı görme yetkim yok sanırım.
 
Tamer Bey,
Yardımlarınız için çok teşekkür ediyorum. Tam olarak bu değildi aslında ama sanıyorum mantığını anladım. Biraz daha üzerinde çalışayım :)
 
Geri
Üst