Merhabalar, uzun zamandır arama yapsamda bir sonuca ulaşamadığım bir sorum var. Ekte örnek olarak eklediğim VT'de form kısa metin kutusuna girilen sayı değeri kadar (maksimum 15) altında bulunan uzun metin kutusuna Vba ile sıra numarası eklemek istiyorum. Örnek olarak müşteri sayımız 5 diyelim; müşteri isimleri kısmına geçtiğimizde,
1-
2-
3-
4-
5-
şeklinde yazdırmasını istiyorum. Anlatımda ve kurallarda bir eksikliğim varsa affola, şimdiden yardımlarınız için teşekkürler.

sadece sıra numarası mı eklenecek?
müşteriler metin kutusunda değer varsa ne yapılacak?
sayı 15den büyükse ne yapacak?

Hemen şöyle açıklayayım; Bahse konu form senaryosu açıldığında direkt yeni kayda git şeklinde düşünelim sıfır veri ile geliyor ve müşteri sayısı soruluyor 10 diyoruz bize müşteri isimleri kısmına sıralama yapıyor. Yardım istediğim kısım burası 15 ten büyükse kısmı ise kullanacağım veritabanı için bana en fazla 15 sıralama yapacak şekilde yeter ve artar bile. Umarım sorunuzu cevaplayabilmişimdir. Ayrıca bu kadar hızlı cevap verdiğiniz için ilginize teşekkürler.

"MusteriSayisi" metin kutusundan çıkıldığında olayına yazdım kodu sayı 15den büyükse bile sadece 15 yazıyor
dilerim işinize yarar

Private Sub MusteriSayisi_Exit(Cancel As Integer)

If CLng(Me.MusteriSayisi) > 15 Then Me.MusteriSayisi = 15

Me.Musteriler = ""

For x = 1 To CLng(Me.MusteriSayisi)

Me.Musteriler = Me.Musteriler & x & " - " & vbNewLine

Next x

End Sub

Mükemmel. Tam istediğim gibi bir sonuç verdi ilginize ve hızınıza çok teşekkür ederim sayın @berduş

ÖD)
iyi çalışmalar