En son girilen değerin Textbox'da gösterilmesi

[M.ACAR]

Forum'daki herkese iyi çalışmalar; Sütundaki Sıra numaralarının en son girilen sayının rakamdan bir sonrasını textbox'a nasıl bir formülle gelmesini sağlayabilirim.

 

[Necdet]

Merhaba,

Ekteki dosyayı inceler misiniz?

Private Sub UserForm_Initialize()
TextBox1 = Cells(Sheets("Sheet1").[A65536].End(3).Row, "A") + 1
End Sub

 

[fedeal]

textbox1.text= Application.WorksheetFunction.Max(Sheets("sayfa2").Range("b:b")) + 1
sayfa2 b sütunu en büyük degeri + 1

fed = Sheets("SAYFA2").Range("b65536").End(xlUp).Row
textbox1.text = Sheets("SAYFA2").Range("b" & fed).value + 1
enson dolu hücre +1

 

[M.ACAR]

Sayın :Necdet YEŞERTENER ve Sayın:Emrah ÇANAKKALE verdiğiniz cevap ve bilgiler için teşekkür ederim,KAYIT Form'unda Textbox1'e BİLGİLER Sayfa'sındaki A sütunundaki en son rakamı aldırmak istiyordum,fakat Necdet Bey'in verdiği formülü uyguladığımda Textbox1'de en son veriyi 1 olarak veriyor,ben mi formülü uyurlayamadım,dosya yı ekliyorum.