• DİKKAT

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

Textbox 1 e yazılanı data soyfası B de göstermiyo

Katılım
2 Ağustos 2008
Mesajlar
59
Excel Vers. ve Dili
2007 TÜRKÇE
Ekteki makro da sorunu bir türlü çözemedim.
textbox 1 e yazılanı data soyfası B de göstermiyo..Sorunu buldum ama çözemedim yardımcı olurmusunuz?
Teşekkür ederim
 
Son düzenleme:
Sayın poetisch,

Öncelikle konu başlıklarınıza dikkat edin.

Dosyanızı xls olarak eklerseniz daha hızlı cevap alırsınız.
 
Şaban bey konu başlığı demişiniz ama başlıktaki yanlışlık nerde??
 
Şaban bey konu başlığı demişiniz ama başlıktaki yanlışlık nerde??
Başlığın konu ile bağlantılı olması gerekiyor. Belki sorunuzun yanıtını bilecek birisi "Sorun nerede" diye bir başlık okursa bunun hangi konu ile alakası olduğunu nereden bilecek ve dolayısıyla kendisinin yardımcı olabileceği bir soru olup olmadığını nasıl anlayacak?
 
Ya bu visual basic i anlamadım gitti.
Dün sadece başlıkta yazdığım hata vardı şimdi
commadbuton1 de
Private Sub CommandButton1_Click()
UserForm1.Show
End Sub
komutu olmasına rağme user formu göstermiyo çıldıracam ya =)
 
Dosyanızı xls olarak eklermisiniz. Userform açılmıyorsa userformun initialize olayında bir sorun var diye düşünülebilir.
 
Ya bu visual basic i anlamadım gitti.
Dün sadece başlıkta yazdığım hata vardı şimdi
commadbuton1 de
Private Sub CommandButton1_Click()
UserForm1.Show
End Sub
komutu olmasına rağme user formu göstermiyo çıldıracam ya =)

Sayın poetisch

levent ustada katılmamak elde değil
benim gördüğüm kadarıyla formunuzda bir adet combo var ama
iki kere aynı kodu yazmışsınız.
Kod:
[b]Private Sub UserForm_Initialize()[/b]
    Yeni_mi = True
    ListBox1.ColumnCount = 2
    ListBox1.ColumnWidths = "80;120"
    ListBox1.RowSource = "Data!B2:C" & Sheets("Data").Range("A65536").End(xlUp).Row
    
    ComboBox1.ColumnCount = 2
''    ComboBox1.ColumnWidths = "100"
    ComboBox1.RowSource = "Sehir!B2:C82"

[b]'    ComboBox2.ColumnCount = 1
'    ComboBox2.ColumnWidths = "100"
 '   ComboBox2.RowSource = "Sehir!B2:C82"[/b]

End Sub
sanırım combobox2 li kısımları koddan kaldırırsanız
formunuz çalışacaktır.
 
Şu An DÜzenlemelerİ Yaptim.Çok TeŞekkÜrler.
Bazi Sorularim Daha Var Buradan Sormaya Devam Edeyİmmİ Yoksa Yenİ Konu Mu AÇayim...?
 
Aynı dosya ile ilgili sorularınızı buradan sorabilirsiniz. xls uzantılı dosyalarınızı da bekleriz :)
 
TAMaM =) şu an bi yerde takıldım..
Ama hemen sormak istemiyorum biraz gayret edip çözmem lazım,yoksa yanlış mı yapıyorum? =)
 
2.Aşama ve sorular =)

Selam..
Şu an kendimce bayağı yol katettiğimi düşünüyorum..
Ama bazı noktalarda mantık yürütmeme rağmen nasıl olduğu konusunda herhangi bir bilgiye sahip olmadığım için takıldım kaldım..
Şimdi yine değerli bilgilerinize başvurarak bu sorunları halledeceğimi düşünüyorum.

Soru1:DATA syafasında kodu 0 dan başlatmam lazım.(Biraz enteresan ama otelin ilk dükkan nosu sıfır =) )

Soru2:Data j ye yazdırdığım dükkan nosunu comboBox1 KOD sütunundan kendisi çekse,
Şöyle bişey Dükkanları kaydederken ilk kayıtta Kod 0 dan başlasa ve bu kaodu combo görse,yeni kayıt dediğimde combo 1 olsa her yeni kayıtta bir artsa,bi de şu sorun var 28-29 nolu dükkanlar birleşik,onları nasıl tanımlarım..?
Biliyorum karışık biraz =)

Soru3:ListBox1 de olduğu gibi comboBox1 de seçtiğim dükkanların kaydı ekrana gelmesi lazım,aynı durum Userforum2 için de geçerli olacak ama bunda anlatırsanız onu ben halletmeye çalışırım.O biraz daha farklı olacak,ve ona tarih eklemem gerekecek fatura tarihi için ..ve seçtiğim dükkanla ilgili sayfaya işlem yapacam..oradan ben faturaya yönlendiririm.

Kafanızı ağrıttım daha bi dünya soru var ama utandım valla..

Teşekkür ederim..
 
Son düzenleme:
zannadiyorum bazı sorularınıza cevap olabilir...

teşekkür ederim birkaçı halloldu gibi..
Diğer konularda da yardım bekliyorum..Şimdi yaptığın değişiklikleri inceledim. user forum 2 de noyu seçince Örn 3 Nolu dükkanı seçince
3 nl sayfanın ilgili yerlerine 4 ü seçince 4 nolu sayfanın ilgili yerlerine değerleri yazmalı..


Tekrar teşekkür ederim.Kolay gelsin..
 
teşekkür ederim.Böyle güzel ben eksiklikler üzerinde çalışıp sorularımı yine yazarım..
Kolay gelsin..
 
Geri
Üst