userformda arabul

[yesilcan]

değerli hocalarım ve arkadaşlarım ekdeki dosyamda ,dilimin döndüğünce yaşadığım sıkıntıyı anlatmaya çalıştım.
yardımlarınızı bekliyorum
saygılarımla.

 

[yesilcan]

Değerli hocalarım ve arkadaşlarım dosyamla ilgilenen varmı acaba?

 

[yesilcan]

peki arkadaşlar bu sorumun çözülebilirliği varmı ?
cevap yazarsanız sevinirim

 

[Skorpiyon]

Sayın yesilcan,

2 dosya yollamışsınız. Her ikisinde de excel'i açılışında gizlemişsiniz.
Yanlış anlamayacağınızı ümit ederek, ifade edeyim ki (başta ben olmak üzere) bir çok arkadaşımız bu tür soruları yanıtlamayı pek istemiyor. Zira birinci olarak istenilenin ne olduğunu bilmeden dosyayı açmak bile istemiyor. Hadi açtı diyelim bu seferde excel gizli. Formu durduracak, exceli görünür hale getirecek ve tekrar açacak vs. vs.

Sizden bundan sonraki mesajlarınızı yazarken biraz daha dikkat etmenizi istediğim / istediğimiz bir kaç husus olacak,

1. Ne istediğinize dair küçükte olsa bir bilgiyi açtığınız konunun içine mutlaka yazınız.
2. Dosyalarınızı gönderirken excel'in görünmezlik özelliğini mutlaka kaldırın.
3. İstediğiniz şeyleri (1 den fazla ise) teker teker sorunuz.
4. Açtığınız konuda kısa geçtiğiniz açıklamayı dosyanız içerisinde detaylı bir şekilde anlatın.

 

[Skorpiyon]

Sayın yesilcan,

1. sorunuz için Ek'li dosyayı inceleyiniz.

 

[yesilcan]

Userformda arabul

Değerli şaban hocam,inanın form kurallarına uygunluk için elimden gelen gayreti gösteriyorum.Ayrıca uyarılarını yanlış anlama gibi bir düşüncem olamaz.çünki uzun süredir excel web ailesinin üyesiyim ve birçok hocalarım ve arkadaşlarımdan bir çok feyz aldığım şeyler oldu.ve de inanıyorumki siz değerli hocalarımız ve arkadaşlarımız gönderilen sorulara elinizden geldiğinde bilginiz ölçüsünde yardımcı olmak için bir çok şeyden feragat ederek (özellikle değerli zamanınızdan) yardım ettiğinize çok kez şahid oldu.
Form kurallarına elinizden geldiğince uymak için titizlik gösteriyorum ama bazen bu tür yanlışlıklar olabiliyor.Bu tatmin ediyorum ki iş hayatınındaki yoğunluğun vermiş olduğunu olumsuz etkilerden biri olsa gerek diye düşünüyorum.
Şaban hocamın talebi doğrultusunda sorumu tekrar soruyorum.
yardımlarınızı esirgemeyeceğinizi düşünüyorum
en derin saygılarımla.

 

[Orion1]

Dosyanız hazır.

 

[Orion1]

Önceki dosyayı indirdiyseniz hatalıdır.
Soruyu yanlış anlamışım.
Şimdi düzelltim.7 numaralı mesajdan indirebilirsiniz.

 

[yesilcan]

Userformda arabul

evren hocam öncelikle ilginizden ötürü teşekkür ederim.bir kaç eksik vardı düzelttim.şaban hocamın kodlarınıda kullanarak istediğim gibi yaptım.hocam userformda ürün kodunu yazınca hangi şehirde kaç adet var ise onu görebiliyorum.mesela 101 / vida ankarada(texbox2) 5 adet var bu 5 adedi değiştirmek istiyorum texbox2 üzerinde 10 olarak düzeltip sayıyı değiştir butonuna bastığımda ilgili sayfadaki 101 / vida 'nın adedi texbox2'deki düzeltiyim sayı olarak değişebilirmi?
bu sorunuda çözersem diğer tüm butonları kendim excel web formdaki örnek uygulamalardan kendi dosyama uyarlayacağım.
ve dosyam hazır olarak.bu sorum işin son ayağı.
teşekkür ederim.
saygılarımla

 

[Orion1]

evren hocam öncelikle ilginizden ötürü teşekkür ederim.bir kaç eksik vardı düzelttim.şaban hocamın kodlarınıda kullanarak istediğim gibi yaptım.hocam userformda ürün kodunu yazınca hangi şehirde kaç adet var ise onu görebiliyorum.mesela 101 / vida ankarada(texbox2) 5 adet var bu 5 adedi değiştirmek istiyorum texbox2 üzerinde 10 olarak düzeltip sayıyı değiştir butonuna bastığımda ilgili sayfadaki 101 / vida 'nın adedi texbox2'deki düzeltiyim sayı olarak değişebilirmi?
bu sorunuda çözersem diğer tüm butonları kendim excel web formdaki örnek uygulamalardan kendi dosyama uyarlayacağım.
ve dosyam hazır olarak.bu sorum işin son ayağı.
teşekkür ederim.
saygılarımla

Yalnız o dosyada bir sayfada ayni kod numaralı veriden birden fazla kayıt varsa sadece o kayıttan ilk kaydın sonucunu verir.Diğerlerini toplamaz.Benim yaptığım dosyada o kod numarasından ayni syafda ne kadar veri girilmişse ayni sayfa içinde toplayarak sonucu verir .İsterseniz bir deneyin.
Ayni sayfaya ayni kod numaralı üründen en az 2 tane veri girin bakalım 2 sinin topalmını verecekmi?
Sonucu buradn bildiriniz.

 

[yesilcan]

Evet hocam doğru söylüyorsunuz 2 adet veriyi toplayarak yazıyor.ama benim istediğim bu değil
zaten bir sayfaya aynı üründen 2 adet girmeyi engelleyeceğim.
benim istediğim şey mesela;vida ürününden ankarada 5 adet var.bu ilden 2 adet sevkiyat yapıldığında o ürünü userformda (texbox2) 3 adet olarak düzeltip sayıyı değiştir butonuna bastığımda ilgili sayfadaki vida ürününün adedi otomatik olarak 3 olarak düzelmesini istiyorum.mümkünmüdür?

 

[Orion1]

Evet hocam doğru söylüyorsunuz 2 adet veriyi toplayarak yazıyor.ama benim istediğim bu değil
zaten bir sayfaya aynı üründen 2 adet girmeyi engelleyeceğim.
benim istediğim şey mesela;vida ürününden ankarada 5 adet var.bu ilden 2 adet sevkiyat yapıldığında o ürünü userformda (texbox2) 3 adet olarak düzeltip sayıyı değiştir butonuna bastığımda ilgili sayfadaki vida ürününün adedi otomatik olarak 3 olarak düzelmesini istiyorum.mümkünmüdür?

Mümkündür.

 

[Orion1]

Ben ANKARA sayfası için Değiştir commandbutonuna kodları yazdım.Diğer butonlarada siz yazabilirsiniz.

Dim k As Range
If TextBox1.Value = "" Then
    MsgBox "Ürün kodu boş olamaz .!!" & vbLf & "Ürün kodunu giriniz..!!", vbCritical, "DİKKAT"
    TextBox1.SetFocus: Exit Sub
End If
Set s1 = Sheets("ANKARA")
Set k = s1.Range("A2:A65536").Find(TextBox1.Value, , xlValues, xlWhole)
On Error GoTo hata
If Not k Is Nothing Then
    s1.Cells(k.Row, "B").Value = TextBox2.Value * 1
    MsgBox "Ürün miktarı değiştirildi..!!", vbOKOnly + vbInformation, Application.UserName
    Else
    MsgBox "[ ANKARA ] Sayfasında [ " & TextBox1.Value & " ] kod numarası bulunamdı"
End If
Exit Sub
hata:
MsgBox "Bir hata Oluştu..!!Büyük ihtimalle Ankara kutucuğuna sayısal bir değer girmediniz..!!", vbCritical, "DİKKAT"

 

[yesilcan]

İlginiz için çok teşekkür ederim.
emeğinize sağlık.geri kalan bölümleri ben halledebilirim zannediyorum.
çözemediğim yerde yardımlarınıza başvurabilirim.
başarılarılarınız devamını dilerim.

 

[Orion1]

İlginiz için çok teşekkür ederim.
emeğinize sağlık.geri kalan bölümleri ben halledebilirim zannediyorum.
çözemediğim yerde yardımlarınıza başvurabilirim.
başarılarılarınız devamını dilerim.

Rica ederim.
iyi çalşmalar.

 

[yesilcan]

değerli hocamlarım,tekrar merhaba
aynı dosya üzerinde veri girişi butonu var.bu butona bastığımda ilgili sayfalara veri girişi yapmak istiyorum.mesela ankaraya ürün ,ürün açılımı,adedi ve açıklama texbox'larına veriler yazıp kaydet butonuna bastığımda ilgili sayfanın ilgili hücrelerine yazdıklarımı aktarması mümkünmü?
sadece ankara için bir örnek verirseniz yeterli olacaktır.

teşekkür ederim.

kolay gelsin.

 

[Orion1]

Ekli dosyanız hazır.
Combobox'tan bir şehir seçip istediğiniz şehire kayıt yapabilirsiniz.

 

[yesilcan]

Çok çok teşekkür ederim .emeğinize sağlık.

 

[Orion1]

Çok çok teşekkür ederim .emeğinize sağlık.

Rica ederim.
iyi çalışmalar.

 

[yesilcan]

hocam çok özür dileyerek birşey sormak istiyorum
ürün kodunu 10 rakam ver üzeri yazdığımda aramıyor
neden acaba?