Müteselsil Sipariş Numarası Verme

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)

Sayfalar: 1 2 3 4 5 6 7 8 9 10 11 12 13

Cvp: Müteselsil Sipariş Numarası Verme - berduş - 05/04/2020

txtUyeNo =textbox1.text & Nz(DMax("cdbl(nz(right([Siparis_No],11),0))", "[MüsteriKayitlari]","[Siparis_No] like '" & textbox1.text "*'"), 0) + 1

gibi bir kod işinize yarayabilir. Deneyemedim teorik

txtUyeNo bu geçici değerin olduğu bir alandir

11 ifadesi alandaki son 11 basamağın sayısal olduğu varsayımına dayanır. A yada B gibi harfler çıkarıldıktan sonra geriye kalan kaç basamak sayisal veri ise 11 yerine o yazılmalı yanlış saymadıysam sizde 11 tane vardi

Cvp: Müteselsil Sipariş Numarası Verme - kanakan52 - 05/04/2020

(05/04/2020, 13:05)berduş yazdı:
txtUyeNo =textbox1.text & Nz(DMax("cdbl(nz(right([Siparis_No],11),0))", "[MüsteriKayitlari]","[Siparis_No] like '" & textbox1.text "*'"), 0) + 1
gibi bir kod işinize yarayabilir. Deneyemedim teorik

txtUyeNo bu geçici değerin olduğu bir alandir

11 ifadesi alandaki son 11 basamağın sayısal olduğu varsayımına dayanır. A yada B gibi harfler çıkarıldıktan sonra geriye kalan kaç basamak sayisal veri ise 11 yerine o yazılmalı yanlış saymadıysam sizde 11 tane vardi

Berduş Hocam selamlar,,

Resimdeki hatayı verdi..

Cvp: Müteselsil Sipariş Numarası Verme - berduş - 05/04/2020

Siz Access bölümüne açtığınız için cevabı ona gore yazmistim Excel NZ fonksiyonunu tanımaz o nedenle hata veriyor olabilir.

txtUyeNo =textbox1.text & DMax("cdbl(nz(right([Siparis_No],11),0))", "[MüsteriKayitlari]","[Siparis_No] like '" & textbox1.text "*'") + 1

Yada

txtUyeNo =textbox1.text & DMax("cdbl(right([Siparis_No],11))", "[MüsteriKayitlari]","[Siparis_No] like '" & textbox1.text "*'") + 1

şeklinde olabilir

Ama eğer tabloda hiç kayıt yoksa yada kayıt var ama sipariş alanında A00000001 gibi bir formatta veri yoksa sorun cikarabilir

Cvp: Müteselsil Sipariş Numarası Verme - kanakan52 - 05/04/2020

Kod:

& textbox1.text "*'") + 1

Bu bölümde bir hata olabilir mi hocam

Kod:

& textbox1.text & "*'") + 1 gibi

Cvp: Müteselsil Sipariş Numarası Verme - berduş - 05/04/2020

Accesste .text aktif metin kutusundaki metni gösterir excelde emin değilim ama zaten resimdeki kodda .text kullanılmamış.

9. mesajdaki kodlarda da aynı hatayı mi verdi

Siz yine de çalışmanızı ekleyin, uygun bir zamanda incelemeye çalışırım.
Bu arada sorunuz excelde ise belirtin excele tasiyalim

Cvp: Müteselsil Sipariş Numarası Verme - kanakan52 - 05/04/2020

Hocam aynı yerde hata veriyor,

Sorum Excel ile alakalı, Userform üzerinden acsess e data yazdırma üzerine çalılşıyorum.

Destek için teşekkür ederim.