Metin Kutusu Birleştirme Formatı

Metin Kutusu Birleştirme Formatı - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Metin Kutusu Birleştirme Formatı (/konu-metin-kutusu-birlestirme-formati.html)

Sayfalar: 1 2

Metin Kutusu Birleştirme Formatı - Şahin_MRKC - 08/04/2021

Merhaba

1- Hazırladığım formda 3 adet metin kutusu var. 1. ve 2. kutudaki verileri 3. kutuda birleştirmek istiyorum. Fakat birleştirme formatı ile ilgili sıkıntı yaşıyorum. Birleştirmek istediğim veri biçimi olarak 0000-00 yazıyorum fakat sonuç istediğim gibi olmuyor.

1. Kutuda "müşteri_no" = 0001

2. Kutuda "proje_sayısı" = 01

3. Kutuda "proje_kodu" = proje_kodu = [musteri_no] & "-" & [proje_sayısı] sonuç 1-1 çıkıyor.

Ben 0001-01 olarak metin kutusunda görünmesini ve tablo hücresine de bu şekilde yazmasını istiyorum.

2- "proje_kodu" tabloda daha önce girilmiş ise "proje_sayısı" metin kutusunu +1 olarak arttırmak için nasıl bir yöntem uygulayabilirim.

Uzman arkadaşların yardımını rica ediyorum. Saygılarımla.

RE: Metin Kutusu Birleştirme Formatı - berduş - 08/04/2021

=Format([Text0];"0000") & "-" & Format([Text1];"00")

şeklinde dener misiniz?

yada

=Format([Text0];"0000") & Format([Text1];"-00")

RE: Metin Kutusu Birleştirme Formatı - Şahin_MRKC - 09/04/2021

Teşekkür ederim sayın berduş 1. örnekteki daha uygun oldu.

2. sorum için bir fikriniz var mıdır.

(08/04/2021, 15:57)Şahin_MRKC yazdı: 2- "proje_kodu" tabloda daha önce girilmiş ise "proje_sayısı" metin kutusunu +1 olarak arttırmak için nasıl bir yöntem uygulayabilirim.

RE: Metin Kutusu Birleştirme Formatı - berduş - 09/04/2021

if dcount("*","tabloadi","proje_kodu='" & proje_kodu & "'")>0 then proje_kodu=Format([Text0],"0000") & "-" & Format([Text1]+1,"00")

benzeri bir kodlama kullanılabilir
ama hatırlatmam gereken 2 nokta var
1 - her konu sadece ve sadece 1 soru içindir, 2. soru için yeni konu açmalısınız
2 - siz çalışmanızı elemeden önereceğimiz kodlar genel geçer varsayımsal kodlardır, hızlı ve doğru çözümler için mümkün oduğunca örnek çalışmanızı eklemenizi öneririm
iyi çalışmalar

RE: Metin Kutusu Birleştirme Formatı - Şahin_MRKC - 09/04/2021

(09/04/2021, 11:32)berduş yazdı: 1 - her konu sadece ve sadece 1 soru içindir, 2. soru için yeni konu açmalısınız

ne demek istediğinizi anladım sayın berduş.

Kod:

Private Sub prb_proje_kodu_Click()

txt_proje_kodu = Format([musteri_no], "0000") & "-" & Format([txt_proje_sayısı], "00")

End Sub

iletmiş oluduğun kodu bu kodun yerine mi kullanmam gerekiyor.

(09/04/2021, 11:32)berduş yazdı: 2 - siz çalışmanızı elemeden önereceğimiz kodlar genel geçer varsayımsal kodlardır, hızlı ve doğru çözümler için mümkün oduğunca örnek çalışmanızı eklemenizi öneririm
iyi çalışmalar

Bu konuda haklısınız. Yapmış olduğum uygulama biraz yoğun ve şu an için karmaşık beni de, sizi de yoracağını düşündüğümden gönderemedim.

RE: Metin Kutusu Birleştirme Formatı - berduş - 09/04/2021

Private Sub prb_proje_kodu_Click()

txt_proje_kodu =iif (dcount("*","tabloadi","proje_kodu='" & proje_kodu & "'")>0, Format([musteri_no],"0000") & "-" & Format([txt_proje_sayısı]+1,"00"), Format([musteri_no],"0000") & "-" & Format([txt_proje_sayısı],"00"))

End Sub

şeklinde kullanabilirsiniz. tabî gerçek alan ve tablo adlarını bilmediğimden isimlendirmeler varsayımsaldır.

şimdi farkettim aslında 4. mesajdaki kodu txt_proje_kodu = Format([musteri_no], "0000") & "-" & Format([txt_proje_sayısı], "00") kodunun altına eklemeniz daha doğru olur