please help with vba coding

[tango71]

Ok, so what i am trying to do is to use a vb form to view ranges on a worksheet. i dont want to change anythin but i do want to scroll through to the last row that has data. that being said, i have literally tried everything i can think of short of just writing a java script and doing what i need through there. i am an amateur at vba but do understand how coding works.
some of the things i have tried are

Worksheets("Register").Range("A1:G22000").PrintPreview

i have tried linking data to a label.
linking to a list box, a text box, you name it ive tried it. just cant get it to display anything.
I know it is probably something stupid simple that im just missing. ive been working on this for about 3 hours
i guess im just not getting it. Please help.

 

[Fluff]

Hi & welcome to MrExcel.
If you are talking about a Listbox on a UserForm, try

Private Sub UserForm_Initialize()
   Me.ListBox1.List = Sheets("Register").Range("A1:G22000").Value
End Sub

 

[DanteAmor]

Hi @★tango71 and welcome to the forum.

Try this.

Change the showmodal property of your userform to False.

Put the following code on a button in your userform:

Private Sub CommandButton1_Click()
  Dim sh As Worksheet
  Set sh = Sheets("Register")
  sh.PageSetup.PrintArea = "A1:G22000"
  sh.PrintPreview
End Sub

 

[tango71]

thanks for the info, i did try entering that into the form code. However, im still at square 1. it pops up but absolutely no values of the sheet are showing in the listbox. i even checked the properties thinking that maybe the text color wasnt black. cant seem to figure it out.

 

[tango71]

I just tried your way Dante, and I placed a command button on the form and used the code and it literally froze. I think im running out of options. I have done this easily in visual basic about 15 years ago, but cant seem to remember how to get it to work.

 

[DanteAmor]

I just tried your way Dante, and I placed a command button on the form and used the code and it literally froze. I think im running out of options. I have done this easily in visual basic about 15 years ago, but cant seem to remember how to get it to work.

This is important:

Change the showmodal property of your userform to False.

 

[tango71]

yes, i did that and it still froze the spreadsheet when i ran it. It looked like it was going to work. i do not get it. i even went as far as trying a dynamic range to see if i could get it to work that way.... I am completely stumped on this one.

 

[Fluff]

Are you trying to use the PrintPreview screen, or are you trying to put data into a listbox?

 

[tango71]

dante, Thanks so much! i just modified the code you wrote and it worked flawlessly. Thank You Again!

 

[DanteAmor]

yes, i did that and it still froze the spreadsheet when i ran it. It looked like it was going to work. i do not get it. i even went as far as trying a dynamic range to see if i could get it to work that way.... I am completely stumped on this one.

That way you can scroll to the Printpreview, the userform is frozen, but you can move in the Printpreview, when you press Esc the control returns to userform.