Reply to thread

Message: [QUOTE="Shazi, post: 6329593"] Hi, when I load my userform, the following procedure is showing the listbox first record. how I can view the last record when userform loads. Option Explicit Dim LastRow As Long Private Sub UserForm_Initialize() Sheets("DailyIssue").Select 'to hide Blank Rows in ListBox. LastRow = Worksheets("DailyIssue").Cells(Rows.Count, "A").End(xlUp).Row ListBox1.RowSource = "A5:J" & LastRow End Sub Private Sub CommandButton1_Click() Unload Me End Sub Pls give me the suggession how can I show the last record when userform load. Best Regards. Syed Shahzad Zafar Madinah [/QUOTE]