• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

UserForm Initialize sayfa aktif ise çalışıyor

Katılım
6 Eylül 2007
Mesajlar
657
Excel Vers. ve Dili
excel 2016 32 Bit ve Excel 2020 32 Bit Türkçe ve İngilizce
Merhaba üstatlar, yapmış olduğum bir çalışmamda UserForm üstündeki TextBoxlara son satırdaki değerlerini Initialize olayı ile aşağıdaki formül ile aldırıyorum ama bir sorun var sayfa aktif ise değerler geliyor aktif değil ise textboxlar boş çıkıyor. Bu konuda yardım lütfen.

Private Sub UserForm_Initialize()
TextBox1.Value = Sheets("Girenpara").Range("F" & Range("F" & Rows.Count).End(xlUp).Row).Value
TextBox2.Value = Sheets("Cıkanpara").Range("F" & Range("F" & Rows.Count).End(xlUp).Row).Value
TextBox3.Text = Val(TextBox1.Text) - Val(TextBox2.Text)
TextBox1 = Format(TextBox1, "###,###.00")
TextBox2 = Format(TextBox2, "###,###.00")
TextBox3 = Format(TextBox3, "###,###.00")
End Sub
 
TextBox1.Value = Sheets("Girenpara").Range("F" & Sheets("Girenpara").Range("F" & Rows.Count).End(xlUp).Row).Value
TextBox2.Value = Sheets("Cıkanpara").Range("F" & Sheets("Girenpara").Range("F" & Rows.Count).End(xlUp).Row).Value
 
TextBox1.Value = Sheets("Girenpara").Range("F" & Sheets("Girenpara").Range("F" & Rows.Count).End(xlUp).Row).Value
TextBox2.Value = Sheets("Cıkanpara").Range("F" & Sheets("Girenpara").Range("F" & Rows.Count).End(xlUp).Row).Value
Sn Ömer bey çok teşekkürler özellikle bu saatteki ilgi ve alakanız için :)
 
Geri
Üst