Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

harfli-sayılı otomatik numaralandırma

ekremzeki
ekremzeki
Access Cevaplanmış Soruları
16
8482

harfli-sayılı otomatik numaralandırma

Çözüldü #11
okileturc
Onursal Üye
okileturc
Bul
Onursal Üye

Additional groups:
Üye
Adı Soyadı: Ok.... Le....
Yaşı: 66
Konum: İzmir
Ofis Versiyonu: Ofis 2003
Son Oturumu: 11/09/2020,15:07
Yorumları: 966
Konuları: 113
Kayıt Tarihi: 18/03/2009
Teşekkür Puanı: 464
Sn. Ekrem hiç de öyle demiyoruz Img-cray
Tepkinize rağmen hatalı kodumu düzeltip
yeni uygulamayı ekliyorum



Private Sub Liste12_AfterUpdate()

If IsNull(DMax("[NO]", "NUMARALAMA")) Then

Me.HARF_SIRA_NO = Me.Liste12 & "00001"

Me.NO = 1

Else

Me.HARF_SIRA_NO = Me.Liste12 & Format((DMax("[NO]", "NUMARALAMA") + 1), "00000")

Me.NO = DMax("[NO]", "NUMARALAMA") + 1

End If

End Sub

Kolay gelsin
.rar NUMARALAMA_okileturc3.rar (Dosya Boyutu: 15,52 KB | İndirme Sayısı: 32)
okileturc, 18-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Cvp: harfli-sayılı otomatik numaralandırma - Yazar: okileturc - 10/11/2010, 20:47