• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü Yeni Seçim Programı

  • Konuyu Başlatan Konuyu Başlatan SonOsmanlı
  • Başlangıç tarihi Başlangıç tarihi
  • Görüntülenme 1,056
Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
SonOsmanlı

SonOsmanlı

Yeni Üye
Katılım
13 May 2023
Mesajlar
138
Çözümler
1
Aldığı beğeni
21
Excel V
Office 365 TR
Konu Sahibi
Hayırlı günler tüm Forum Hocalarıma ve üyelerine,ben daha önce burada paylaştığım ve sorunuma cevap bulduğum "Seçim Programım" için tekrar sizlere başvurmak zorunda kaldım.Programa bazı ilaveler yaptım.Fakat ekleöiş olduğum user formlarda "Analiz" ve "data" sayfaları birbirini etkiliyor.İşi iyice karıştırdığımın farkına vardım bir türlü toparlayamıyorum. Cumhur başkanlığı ve Milletvekilliği seçimlerinde toplam seçmen sayıları ve diğer rakamlar aynı.Fakat ilçe bazında seçmen sayıları farklı olduğundan hangi veri üzerinde çalışırsam onun rakamları geliyor.Bunu bir türlü çözemedim.Konu hakkında yardımlarınızı bekliyorum..
Selam ve saygılarımı sunuyorum..
Not : Programda "Ana Sayfa" vardı dosya büyük dediği için sildim.. vba kodlarında hata verebilir...
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Çözüm
Refaz
Label299.Caption = Format(Range("G19"), "#,##0")

Örneğin yukarıdaki Range den önce sayfa adını yazın yazmazsanız hangi sayfada form açılırsa ordan çeker ve boşssa boş gelir.
Dediğim sayfa ekleme örnekleride kodda bolca mevcut :)
Tarihe göre sırala Oylara göre sırala
Konu Sahibi
Ali ÖZ' Alıntı:
Merhaba,
Çalışmanıza vakıf değilim kusura bakmayın.Eğer işlem sırasını yazarsanız yardımcı olmaya çalışayım.
Genişletmek için tıkla...
İlginiz için çok teşekkür ederim.
işlem sırası derken öncelikle Ülke geneli Milletvekili Seçim Sonuçları sonrasında Cumhurbaşkalığı ülke geneli sonuçları ve sonrasında da
İlçe bazında ben Kendi ilimin ve ilçemin sonuçlarını girmek istedim. Ama Hangi analiz sayfasıyla çalışıyorsam o analiz sayfasındaki seçmen sayıları programa geliyor. Milletvekili ve Cumhurbaşkanı seçmen sayısı aynı fakat ilçe seçmen sayısı farklı gelmesi gerekiyor. Bunu yapamadım programda.. Birde Ana Sayfa vardı fakat buraya yüklerken dosya boyutu büyük dediğinden kaldırmak zorunda kaldım...
 
Olumlu oy 0 Negatif oyla
Merhaba,
lbl_OySayisi_Toplam_iLce.Caption = Format(Sayfa5.Range("M3").Value, "###,###") sayıyı aldığı kod satırı burası.
Sayfa5 den alıyor veriyi doğru mu ?
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Ali ÖZ' Alıntı:
Merhaba,
lbl_OySayisi_Toplam_iLce.Caption = Format(Sayfa5.Range("M3").Value, "###,###") sayıyı aldığı kod satırı burası.
Sayfa5 den alıyor veriyi doğru mu ?
Genişletmek için tıkla...
Evet ben aslında her analize ayrı sayfa açtım..sayfalara bakarsanız görürsünüz..Ha tam bilemedim tek sayfadan da olabilir..
Orada Sayfa6 ve sayfa7 de var..
 
Olumlu oy 0 Negatif oyla
Sayfadaki veride herhangi bir formül göremedim.Dolayısı ile ne seçerseniz seçin değişmeyecektir.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Ben biraz düzelttim programı..Diğer "Analiz" sayfalarında olan;
Toplam Oy Sayısı
Kullanılan Oy Sayısı
Kalan Oy Sayısı
Sayılan Yüzde
Kalan Yüzde
Labellerini yalnızca ilk "ANALİZ" sayfasında topladım.Böylece Toplam oy sayıları geldi.Fakat yanlışlıkla diğer "ANALİZ" sayfalarında
kalırsak o zaman hepsi "Sıfır" yani boş görünüyor.
Birde sizden ricam Zonguldak-Alaplı ilçesi verilerini ve Mahalle köy verilerini Combobox'a atayamıyorum bu konularda yardımcı olabilirseniz sevineceğim...
Kusura bakmayın sizi çok rahatsız ediyorum...
Sağlıcakla...
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Olumlu oy 0 Negatif oyla
Veri çektiğiniz kod bölümünde başvuru alanını tam belirleyin.
label1.caption = range("a" & i).value yerine ;
label1.caption = sheets("ANALİZ").range("a" & i).value gibi...
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Ali ÖZ' Alıntı:
Veri çektiğiniz kod bölümünde başvuru alanını tam belirleyin.
label1.caption = range("a" & i).value yerine ;
label1.caption = sheets("ANALİZ").range("a" & i).value gibi...
Genişletmek için tıkla...
????
Dosya açık dediğinizi anlayamadım...Siz dediğinizi yapıp deneyebilir misiniz...
 
Olumlu oy 0 Negatif oyla
Label299.Caption = Format(Range("G19"), "#,##0")

Örneğin yukarıdaki Range den önce sayfa adını yazın yazmazsanız hangi sayfada form açılırsa ordan çeker ve boşssa boş gelir.
Dediğim sayfa ekleme örnekleride kodda bolca mevcut :)
 
Olumlu oy 0 Negatif oyla
Çözüm
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst