DarkJester89
Board Regular
- Joined
- Nov 5, 2017
- Messages
- 109
- Office Version
- 2016
- Platform
- Windows
I wasn't able to find any vba zoom except for auto-changing based on resolution, but is it possible to autofit custom zoom level based on most furthest out column that has text?
Bonus Code: To reset the scroll bar to far left, so it's looking at Column A/Row1, this code works I have it on a "reset" userbutton.
Code:
Private Sub Workbook_Open()
ActiveWindow.Zoom = 100 'also you can change to other size
End Sub
Bonus Code: To reset the scroll bar to far left, so it's looking at Column A/Row1, this code works I have it on a "reset" userbutton.
VBA Code:
'Scroll to a specific row and column
ActiveWindow.ScrollRow = 1
ActiveWindow.ScrollColumn = 1