[Yardım]  Saçımı Başımı Yoldum.. Yardım Lütfen...

Forum kurallarına ve Türkçe imla kurallarına uygun olmayan mesajları buraya alıyoruz. Lütfen aynı hataları tekrarlamayın!

Saçımı Başımı Yoldum.. Yardım Lütfen...

İleti#1)  babocan2 » 04 Ağu 2020 23:56

merhaba,

internette 3 hafta boyunca hem izleyip hemde yazarak hazırlamış olduğum programın sadece "tek satırda değişiklik" yaptığını öğrenince yıkıldım. inanın ne saç kaldı ne göz kaldı nede beyin.. Öte yandan hanım ile yaptığım onca atışmalarıda saymıyorum..
sizden ricam programdaki hataları düzeltmenizdir..

Benim bulduğum hatalar;

1- "Teklifler sayfasından bir firma seçip alta gelen Teklif No lardan da bir tanesini seçtiğimde (en az iki veya daha fazla ürün olan bir teklif olmalı) sağdaki ürünlerden bir tanesinin herhangi bir özelliğini(miktar,kargo ücreti, vs..) deiğiştiriğ "DEĞİŞTİR" butonuna bastığımda, listboxta bunu değiştiriyor lakin exceldeki "TEKLİFLER" sayfasında o teklif numarasında kayıtlı olan bütün bilgileri değiştirdiğim bilgiler ile aynı yapıyor..Örneğin A firmasının T1001 numaralı teklifini seçtiğimizde Listboxt a bu teklife ait "Elma,Armut,Kiraz,Vişne"(En az 2 veya daha fazla ürün olmalı) ürünleri var diyelim, Listbox ta armutu seçili iken yerine Kavun u seçerek gerekli bilgileri girdikten sonra "DEĞİŞTİR" Tuşuna basıldığında, Listbo taki bilgiler doğru olarak güncelleniyor fakat excel de "TEKLİFLER" sayfasında A firmasına ait T1001 numaralı kayıtların hepsi birden Kavun a ait bilgiler olarak değişiyor..

2- "Teklifler" sayfasında "SİLME" işlemi yapılmak istenince de 1 numarada anlatılan problemin aynısı yaşanıyor.

3- Ben programın orjinaline ilave olarak Firma ile alakalı bir takım ilave bilgiler ekledim (İndirim, Alınan ödeme, Kalan tutar, kargo ücreti vs..). bazı işlemleri yaptırabildim ama bazılarını yaptıramadım.. Zaten kullanımda anlaşılacaktır..

Çok ihtiyacım olan bu programla ilgilenebilecek bir arkadaş var ise şimdiden Allah razı olsun.. Hakkını helal etsin lütfen..
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
babocan2
 
Kayıt: 04 Ağu 2020 13:17
Meslek: bayrakçı
Yaş: 44
İleti: 5
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: ankara

Cevap: Saçımı Başımı Yoldum.. Yardım Lütfen...

İleti#2)  feraz » 05 Ağu 2020 03:19

Merhaba.
Normalde böyle başlık için forum kuralları gereği yardımedilmiyormuş yinede inceledim dosyanızı lakin tam anlamadım.

Güncelle kodunu incelediğimde B sütununda Teklif no arıyor varsa bulunan satırları siliyor sonra alttaki kodla en son boş satırdan başlayarak listboxtaki tüm verileri aktarıyor.
Alttaki kod hep aynılarını aktarıyor çünkü mesela Tb4_FirmaAdý burası hep aynıçTabidiğerleride aynı döngüdeki
Eğer listboxtakilerini sayfaya aktaracaksanız Tb4_FirmaAdý gibi yerleri değiştirmeniz gerekiyor LB4_TeklifDetayListesi.List(LB4_TeklifDetayListesi.ListCount-1, 0) gibi mesela.

Kod: Tümünü seç
For LboxSatýrý = 0 To LB4_TeklifDetayListesi.ListCount - 1
         
              wsTeklifler.Cells(SonSatýr, 1) = Tb4_FirmaAdý              ' buradan itibaren veritabanýnda deðiþiklik yapmaya baþlýyor
              wsTeklifler.Cells(SonSatýr, 2) = Tb4_TeklifNo
              wsTeklifler.Cells(SonSatýr, 3) = CDate(Tb4_Tarih)
              wsTeklifler.Cells(SonSatýr, 4) = Tb4_ÜrünAdý
              wsTeklifler.Cells(SonSatýr, 5) = CDbl(Tb4_BirimFiyatý)
              wsTeklifler.Cells(SonSatýr, 6) = CDbl(Tb4_KdvOraný)
              wsTeklifler.Cells(SonSatýr, 7) = CDbl(Tb4_Miktar)
              wsTeklifler.Cells(SonSatýr, 8) = CDbl(Tb4_Tutar)
              wsTeklifler.Cells(SonSatýr, 9) = CDbl(Tb4_KdvTutarý)
              wsTeklifler.Cells(SonSatýr, 10) = CDbl(Tb4_TopTutar)
              wsTeklifler.Cells(SonSatýr, 11) = La4_Temsilci
             
             
             
              wsTeklifler.Cells(SonSatýr, 12) = CDbl(Tb4_Ýndirim)
              wsTeklifler.Cells(SonSatýr, 13) = CDbl(Tb4_KargoÜcreti)
              wsTeklifler.Cells(SonSatýr, 14) = CDbl(Tb4_AlýnanÖdeme)
              wsTeklifler.Cells(SonSatýr, 15) = CDbl(Tb4_KalanTutar)
              wsTeklifler.Cells(SonSatýr, 16) = CDate(Tb4_Tarih1)
              wsTeklifler.Cells(SonSatýr, 17) = CDbl(Tb4_YapýlanKar)
              wsTeklifler.Cells(SonSatýr, 18) = Tb4_Açýklama
       
              SonSatýr = SonSatýr + 1
       
Next LboxSatýrý
Kullanıcı avatarı
feraz
Site Dostu
 
Kayıt: 19 May 2014 17:36
Konum: Almanya
Meslek: İşçi
Yaş: 41
İleti: 6355
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray

Cevap: Saçımı Başımı Yoldum.. Yardım Lütfen...

İleti#3)  feraz » 05 Ağu 2020 03:26

LB4_TeklifDetayListesi.List(LB4_TeklifDetayListesi.ListCount-1, 0)

Yukarıdaki örneği ters vermişim.Bir tane say diye değişken tanımlayıp

LB4_TeklifDetayListesi.List(say, 0)
Say=say +1

Gibi yapılabilir.Tabii ters anlamadıysam.Yani tam anlaşılmıyor sanki kunu.Mesela listboxtan kavun seçilince sadece iteklifler sayfasına sadece listbıxtaki seçildn kavun satırlarımı aktarlacak yada tümümü gibi.
Kullanıcı avatarı
feraz
Site Dostu
 
Kayıt: 19 May 2014 17:36
Konum: Almanya
Meslek: İşçi
Yaş: 41
İleti: 6355
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray

Cevap: Saçımı Başımı Yoldum.. Yardım Lütfen...

İleti#4)  babocan2 » 05 Ağu 2020 04:18

bukadar hızlı cevap için teşekkür ederim..
konu başlığı ile ilgili hatam içinde herkesten özür dilerim. umarım bu durum bana geri dönüşleri etkilemez..
bu tür forumlarda çok acemiyim..

anlatmak istediğim durumu ekteki resimde göstermeye çalıştım. T1002 teklifini oluşturduğumda 5 farklı meyva ismi ve bilgileri vardı, sonradan bunlardan birini "ÜZÜM" olarak değiştirdiğimde excel deki "TEKLİFLER" sayfasında bulunan T1002 de 5 farklı ürün bulunması gerekirken bu 5 ürünün tamamının "üzüm" e dönüşmesidir(diğer bilgileri dahil).

bu aynı zamanda "SİL" işleminde de olmaktadır..
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
babocan2
 
Kayıt: 04 Ağu 2020 13:17
Meslek: bayrakçı
Yaş: 44
İleti: 5
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: ankara

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: Saçımı Başımı Yoldum.. Yardım Lütfen...

İleti#5)  feraz » 05 Ağu 2020 12:52

Merhaba.
Başlık olayı benim için önemli değil sadece cevap vermiyorlarmış :)

Neyse kodlarınız çok karışık.Tamda anladımmı bilemiyorum bişeyler yaptım ve gif ile anlattım.Gif çalışmazsa tıklayın üzerine.

Bir Userform ekledim orda güncelleme yaptırıp UFTeklif userofrmuna değişen veriler geliyor sonunda ise ürün bulunamadı mesajı çıkıyor veri değişince oralar sanırım ayarlanmalı bu şekilde doğruysa.

Tabii ben güncelleme kodundaki verilerin bazılarını pasif yaptım önceki mesajda eklediğim kodları.

Resim
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
feraz
Site Dostu
 
Kayıt: 19 May 2014 17:36
Konum: Almanya
Meslek: İşçi
Yaş: 41
İleti: 6355
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray

Cevap: Saçımı Başımı Yoldum.. Yardım Lütfen...

İleti#6)  babocan2 » 05 Ağu 2020 13:16

merhaba..
dosyayı mail olarak atabilirmisiniz..

XXxxXXxxXX
Kullanıcı avatarı
babocan2
 
Kayıt: 04 Ağu 2020 13:17
Meslek: bayrakçı
Yaş: 44
İleti: 5
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: ankara

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: Saçımı Başımı Yoldum.. Yardım Lütfen...

İleti#7)  babocan2 » 05 Ağu 2020 13:30

tekrar merhaba,

ilginiz için teşekkür ederim..

problem UTFekliflerde değil..

UFTeklif de herhangi bir çalışma arıza yapmıyor, ürün adı değiştirildiğinde
"C:\Users\casper\Desktop\xxxxxxxdeneme\sheets"Teklifler" sayfasına kayıt yaptığında yapıyor..

siz programda değişikliği yaptıktan sonra excel dosyasındaki ilgilisayfayı("C:\Users\casper\Desktop\xxxxxxxdeneme\sheets"Teklifler") kontrol ederseniz hatayı anlayabilirsiniz..
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
babocan2
 
Kayıt: 04 Ağu 2020 13:17
Meslek: bayrakçı
Yaş: 44
İleti: 5
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: ankara

Cevap: Saçımı Başımı Yoldum.. Yardım Lütfen...

İleti#8)  feraz » 05 Ağu 2020 13:41

Merhaba.
Rica ederim.Dediğiniz yolu zaten otomatik buluyordu.Evet kapalı dosyaya kaydederken arama yapıyor veri değişince hata veriyor anladığım.
Kullanıcı avatarı
feraz
Site Dostu
 
Kayıt: 19 May 2014 17:36
Konum: Almanya
Meslek: İşçi
Yaş: 41
İleti: 6355
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray

Cevap: Saçımı Başımı Yoldum.. Yardım Lütfen...

İleti#9)  feraz » 05 Ağu 2020 14:02

Hata sebebi Ürün adını değiştirdiğim içinmiş yani A sütununda arıyor yoksa hata veriyor kodu öyle yazmışsınız.Eğer çift tıklayına listboxtakiler değiçince UFTeklif deki Değiştir butonuna tıklayınız sayfaya aktarmak için yada Cmd4_Değiştir_Click bu şekide çift tıklama koduna ekleyin resimdeki gibi.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
feraz
Site Dostu
 
Kayıt: 19 May 2014 17:36
Konum: Almanya
Meslek: İşçi
Yaş: 41
İleti: 6355
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray

Cevap: Saçımı Başımı Yoldum.. Yardım Lütfen...

İleti#10)  feraz » 05 Ağu 2020 14:03

Silme komutunuda ekleyebilirsiniz unuttum onu resime eklemeyi zaten anlarsınız resime bakınca.
Kullanıcı avatarı
feraz
Site Dostu
 
Kayıt: 19 May 2014 17:36
Konum: Almanya
Meslek: İşçi
Yaş: 41
İleti: 6355
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray

Cevap: Saçımı Başımı Yoldum.. Yardım Lütfen...

İleti#11)  feraz » 05 Ağu 2020 14:30

Değişkensiz yaptım.

Gifi izleyin.Sadece bazı kısımlarını ekledim koda güncelleme için.Doğruysa ayarlanır.

Resim
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
feraz
Site Dostu
 
Kayıt: 19 May 2014 17:36
Konum: Almanya
Meslek: İşçi
Yaş: 41
İleti: 6355
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray

Cevap: Saçımı Başımı Yoldum.. Yardım Lütfen...

İleti#12)  babocan2 » 05 Ağu 2020 14:51

ilginiz için teşekkürler..

Peki T1007 de 2 tane üzüm var siz üzüm yerine "ELMA" yazıp değiştir yaparmısınız. ve tekrar burayı"C:\Users\casper\Desktop\xxxxxxxdeneme\"Teklifler" i kontrol edermisiniz..
yani sonuç olarak ""C:\Users\casper\Desktop\xxxxxxxdeneme\"Teklifler" de
Armut ... .... ....
Üzüm ... .... ....
Elma ... .... ....

olacak mı?
Kullanıcı avatarı
babocan2
 
Kayıt: 04 Ağu 2020 13:17
Meslek: bayrakçı
Yaş: 44
İleti: 5
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: ankara

Cevap: Saçımı Başımı Yoldum.. Yardım Lütfen...

İleti#13)  feraz » 05 Ağu 2020 15:14

Gife tıklayıp izleyin.

Resim
Kullanıcı avatarı
feraz
Site Dostu
 
Kayıt: 19 May 2014 17:36
Konum: Almanya
Meslek: İşçi
Yaş: 41
İleti: 6355
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray


Forum Çöp Kutusu

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 1 misafir

Bumerang - Yazarkafe