Format(123456789, "#,##0")


I can't say I've done a lot with the Window object, so there might be a
better way.

Sub test()
Dim rng As Range, lngRows As Long

Set rng = Range("A300")

rng.Select
With ActiveWindow.VisibleRange
ActiveWindow.SmallScroll (.Rows.Count / 2) - (.Rows.Count -
(rng.Row - .Row))
End With
End Sub


--
Rob van Gelder - http://www.vangelder.co.nz/excel


"Chuckles123" wrote in message
...

o When inputting numerical data via a TextBox, is there anyway to have
the data displayed in comma-separated (000's) format? I assume the
answer is not.

o My spreadsheet has a variable number of rows; there is a summary at
the end. Is there anyway, after the macros have executed, for a
certain row in the summary to be displayed very near the exact middle
of the screen?

Thanks for your input.
Chuckles123


--
Chuckles123
------------------------------------------------------------------------
Chuckles123's Profile:
http://www.excelforum.com/member.php...o&userid=14948
View this thread: http://www.excelforum.com/showthread...hreadid=278906