Müteselsil Sipariş Numarası Verme - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html) +--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html) +--- Konu Başlığı: Müteselsil Sipariş Numarası Verme (/konu-muteselsil-siparis-numarasi-verme.html) |
Cvp: Müteselsil Sipariş Numarası Verme - kanakan52 - 05/04/2020 (05/04/2020, 14:36)berduş yazdı: Belirttiğim gibi çalışmanızı eklerseniz uygun olduğumuzda inceleyip çözmeye çalışırız. Hocam , ekledim.. Tekrar tekrar teşekkür ederim. Cvp: Müteselsil Sipariş Numarası Verme - feraz - 06/04/2020 Yanlış anlamış olabilirim. Kodun mantığı şu; textboxtan arama apılınca listviewdeki en son veriyi bulur ve 1 fazlasını aktarır.Dedğim gibi tam olmadı başka yoldanda yapılabilir. Kod:
rs.Open "select * from m_siparis WHERE m_siparis.SIPEMRINO LIKE '" & TextBox1.Text & "%'", baglan, 1, 1 İlk kod eklediğim altındaki ise tamamı. Kod:
If .ListItems.Count < 1 Then Kod:
Sub filtresprs() Cvp: Müteselsil Sipariş Numarası Verme - kanakan52 - 06/04/2020 feraz hocam günaydın, selamlar, Gecenin bir yarısı biz uyurken sen bizim sorunlarımızla mı uşraştın, Allah senden razı olsun, her şey gönlünce olsun, Hocam mantık muhasebe programlarının fatura modülü, irsaliye modülü mantığı aslında. Hani yeni fatura keserken fatura noya tıklayınca sıradaki numarayı atarya, onu sordum aslında.. Kodlarınızı işte olduğumdan deneyemedim, eve geçince seve seve deneyeceğim. Saygılar.. Cvp: Müteselsil Sipariş Numarası Verme - berduş - 06/04/2020 Tsipno_KeyPress olayını aşağıdaki gibi düzenler misiniz
Not:baglan.Open "provider=Microsoft.ACE.OLEDB.12.0;data source=" & ThisWorkbook.Path & "\veritabani.mdb" bu koddaki Microsoft.ACE.OLEDB.12.0; sizde microsoft.jet.oledb.4.0; olabilir Cvp: Müteselsil Sipariş Numarası Verme - kanakan52 - 06/04/2020 Hocam selamlar, Cevabınızı görür görmez atladım geldim.. Muhteşem, tam istediğim sonuç.. Emeğinize sağlık, ellerinize, zihninize sağlık. Ne güzel insanlarsınız yahuu çok mutlu oldum.. Cvp: Müteselsil Sipariş Numarası Verme - berduş - 06/04/2020 Yalniz dikkat etmeniz gereken 1 nokta var burada sayisal alan 11 haneli olduğu için right fonksiyonunda 11 kullanıldı burada amaç alandan sayisal olmayan alfabetik kısmi çıkarmaktır. Eğer tablodaki alanının yapısı değişirse fonksiyon ona göre yeniden düzenlenmeli Iyi calismalar |