Id Alanını Özelleştirme

1 2 3 4
02/01/2020, 11:57

berduş

kodu benim dediğim şekilde denediniz mi?
02/01/2020, 12:06

yasinacar

(02/01/2020, 11:43)berduş yazdı:
metin1="TUR" & format(tarihAlanı,"ddmmyy-") & Dlookup ("bas_harf","TKullanicilar","kul_id=" & KullaniciKim) & me.rev_ID
benzeri bir kod işinize yarayabilir

Söz dizimi yanlış gibi bişi hata veriyor
02/01/2020, 12:32

berduş

kodu nereye yazıyorsunuz?
çalışmaya bir buton ve metin kutusu ekledim
revizyon Id alanına sayı eklendikten sonra -müşteri seçtikten sonra- butona basınca çalıştı
ekteki örnekte göreceğiniz gibi bende çalıştı
Me.Metin104 = " Tur" & Format(MTN_TARIH, "ddmmyy -") & Dlookup ("bas_harf", "TKullanicilar", "kul_id=" & KullaniciKim) & MTN_REV_ID
[attachment=31113]
02/01/2020, 13:12

yasinacar

(02/01/2020, 12:32)berduş yazdı: kodu nereye yazıyorsunuz?
çalışmaya bir buton ve metin kutusu ekledim
revizyon  Id alanına sayı eklendikten sonra  -müşteri seçtikten sonra- butona basınca çalıştı
ekteki örnekte göreceğiniz gibi bende çalıştı
Me.Metin104 = " Tur" & Format(MTN_TARIH, "ddmmyy -") & Dlookup ("bas_harf", "TKullanicilar", "kul_id=" & KullaniciKim) & MTN_REV_ID

Peki bunu F_YTEKLIF_H formunun içinde yeni bir metin kutusuna yazdırmak istiyorum ve REV_ID yerine TEKLIF_ID yi alması gerekiyor tarihi F_YTEKLIFHR_ALTFRM formunda alacak

Me.Metin104 = " TUR" & Format("MTN_TARIH", "F_YTEKLIFHR_ALTFRM", "ddmmyy -") & Dlookup ("bas_harf", "TKullanicilar", "kul_id=" & KullaniciKim) & MTN_TEKLIF_ID
Debug.Print Dlookup ("bas_harf", "TKullanicilar", "kul_id=" & KullaniciKim)

Bu olmadı
02/01/2020, 13:26

berduş

Me.metinKutusuadı= "Tur" & Format(Form_F_YTEKLIFHR_ALTFRM.MTN_TARIH, "ddmmyy -") & Dlookup ("bas_harf", "TKullanicilar", "kul_id=" & KullaniciKim) & MTN_TEKLIF_ID

debug.print sadece kod penceresine yazdırmak için kullanılır
debug.print ile başlayan satırları silebilirsiniz.
Debug.Print Dlookup ("bas_harf", "TKullanicilar", "kul_id=" & KullaniciKim)
bu satır silinebilir.
02/01/2020, 13:58

yasinacar

(02/01/2020, 13:26)berduş yazdı:
Me.metinKutusuadı= "Tur" & Format(Form_F_YTEKLIFHR_ALTFRM.MTN_TARIH, "ddmmyy -") & Dlookup ("bas_harf", "TKullanicilar", "kul_id=" & KullaniciKim) & MTN_TEKLIF_ID

debug.print sadece kod penceresine yazdırmak için kullanılır
debug.print ile başlayan satırları silebilirsiniz.
Debug.Print Dlookup ("bas_harf", "TKullanicilar", "kul_id=" & KullaniciKim)
bu satır silinebilir.

Hocam teşekkürler yardımlarınıdan dolayı lakim şimdide bas_harf alanını çekmiyor boş geliyor birde bunu butonla değilde firma ismi seçildiğinde alana otomatik yazması lazım olay kısmında günşelleştirme öncesimi yapmam gerek
1 2 3 4