ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Two Quick Questions (https://www.excelbanter.com/excel-programming/316897-two-quick-questions.html)

Chuckles123[_61_]

Two Quick Questions
 

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

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

Thanks for your input.
Chuckles12

--
Chuckles12
-----------------------------------------------------------------------
Chuckles123's Profile: http://www.excelforum.com/member.php...fo&userid=1494
View this thread: http://www.excelforum.com/showthread.php?threadid=27890


Tom Ogilvy

Two Quick Questions
 
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
if isnumeric(Textbox1.Text) then
Textbox1.Text = Format(Textbox1.Text,"#,##0")
End if
End Sub

Application.goto Cells(rows.count,1)End(xlup).Offset(-10,1), True


--
Regards,
Tom Ogilvy

"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




Rob van Gelder[_4_]

Two Quick Questions
 
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





All times are GMT +1. The time now is 11:23 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com