On Jul 7, 11:01*am, "Rick Rothstein \(MVP - VB\)"
wrote:
Why did you post your question twice... and within 4 minutes of each other
no less? Did you really think that after 4 minutes you had waited too long
for a response? I only ask because there was no need for me to post my
answer as you already had the same answer from someone else in your other
question; however, I hadn't read to the other posting to see that before
constructing an answer to the first post I saw when I came online. The
people answering questions here are volunteers... there is not always
someone available... in the future, please just post your question once and
then wait... this way you won't waste the volunteers' time constructing
answers to questions you already have an answer to elsewhere.

Rick

"Rick Rothstein (MVP - VB)" wrote in
. ..



I think you want to do this at the end of your code...

ListBox1.ListIndex = ListBox1.ListCount - 1

Rick

"Shazi" wrote in message
...
Hi,

when I load my userform, the following procedure is showing the
listbox *first record. how I can view the last record in the ListBox
when userform loads.

I am using this code:

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

Regards.

Syed Shahzad Zafar- Hide quoted text -

- Show quoted text -

Dear Mr. Rick,

There was a problem with my Internet connection, it was stuck when I
tried to send my post, whenn I click on Send button, the blank screen
came out, and my pc was stuck, I closed the my browser from the Task
Manager.

It was not intentially, it was happen may be Internet connection
stopped or there was problem with my pc.

I am not sending any message twice, always I am waiting for my reply
at least 12 hours......... a day.

any way sorry for inconvenience.

Regards

Shahzad