Comboboxa değer atama

[robot]

Herkese merhaba burada bilgisinden faydanlandığımız arkadaşlara çok teşekkürler benim sorunum şu excel sayfası ile çalıştığım basit bir proğramım var bu proğramda 4 tane Userformum var ve her useform kendi excel sayfasına verileri kaydediyor bu userformlardada RowSource ile ilgili sütundan değerleri alan comboboxlar var fakat sayfa 1 e userformla kayıt yaptığımda diğer userformlarda mevcut comboboxu açtığımda ilk sayfadaki comboboxun değerleri diğer userformlardaki comboboxlarada geliyor ben her userformun kendi sayfasındaki veriyi comboboxa almasını istiyorum şimdiden teşekkür ederim.

 

[Orion1]

Aşağıdaki kodu kendi verilerinize göre uyarlayınız.

Private Sub UserForm_Initialize()
ComboBox1.RowSource = "A1:A100"
End Sub

 

[robot]

Orion2 ilginize teşekkür ederim yazdığınız kodu uyguluyorum ancak hata veriyor nedenini bir türlü anlayamadım dosyayı göndersem daha anlaşılır olabilir belki koruma şifresi 2393

 

[Orion1]

Çalışma sayfalarındaki isimlerde aralarında boşluk karakteri koymayınız.Row source ile veriler comboboxlara alınamıyor.
Userform2 de ben aşağıdaki kırmızı ile olan kodları ekledim.Diğer userformlar içinde siz yapınız.
Ekli dosyayı inceleyiniz.

Private Sub UserForm_Initialize()
[COLOR="Red"]ALAN02.RowSource = "Ceza_Dava_Kayıt!C2:C" & Cells(65536, "C").End(xlUp).Row
If ALAN02.ListCount > 0 Then
    ALAN02.ListIndex = 0
End If
ALAN04.RowSource = "Ceza_Dava_Kayıt!D2:D" & Cells(65536, "D").End(xlUp).Row
If ALAN04.ListCount > 0 Then
    ALAN04.ListIndex = 0
End If[/COLOR] 
   With ALAN16
        .AddItem "ÇAMELİ"
        .AddItem "GÖLDAĞ"
        .AddItem "BOYALI"
        .AddItem "DEĞNE"
        [COLOR="red"].ListIndex = 0[/COLOR]
    End With
  
End Sub

 

[ECYavuz]

İncelediğim kadarıyla tüm UserFormlarda bulunan ComboBox lar ALAN02 ve ALAN04 olarak tanımlanmış... Bu nedenle ilk UserFormda tanımlandığınız RowSource alanına göre tüm formlar aynı değerleri gösteriyor. Zaten programa görede öyle olması gerekmiyormu?

 

[robot]

Sayın ECYavuz şöyleki her sayfa 1 = Userform2, Sayfa2 = Userform3 yani userform ve sayfaları birbirinden bağımsız düşünün her userform kendi sayfasındaki bilgiyi alsın çünkü her sayfadaki bilgilerin farklı olması gerekiyor acaba bu dediğiniz gibi her userformda comboboxlar ALAN02 ve ALAN04 olarak tanımlandığından mı aynısını alıyor acaba