Scroll Left

[AlexanderBB]

Application.Goto Reference:=Range("a1"), Scroll:=True

I found this works, but can you not select the cell.
Aim is to scroll to Home (left) in the Worksheet only.

Thanks.

 

[My Aswer Is This]

This script selects the cell for me.
What do you want to do with Range("A1")

What cell do you want to select?
Some cell has to be selected.

Try this:

Sub GotoMe()
'Modified  7/2/2019  1:07:06 AM  EDT
Application.Goto Reference:=Range("a1"), Scroll:=True
Selection.Value = "Cake"
End Sub

 

[Rick Rothstein]

Aim is to scroll to Home (left) in the Worksheet only.

This statement is not entirely clear. Do you mean you want to scroll to Column A but in the row that is currently active?

Or do you mean you want to scroll to the left side of the currently displayed section of the worksheet no matter what column is on the left side? In other words if the displayed range of cells is Q25:AP65 and cell Z40 is active, then you want to activate cell Q40 without scrolling anything?

 

[Rick Rothstein]

Do you mean you want to scroll to Column A but in the row that is currently active?

If this is what you want, then give this code line a try...

Intersect(ActiveCell.EntireRow, Columns("A")).Select

Or do you mean you want to scroll to the left side of the currently displayed section of the worksheet no matter what column is on the left side? In other words if the displayed range of cells is Q25:AP65 and cell Z40 is active, then you want to activate cell Q40 without scrolling anything?

If this is what you want, then give this code line a try...

Intersect(ActiveCell.EntireRow, ActiveWindow.VisibleRange)(1).Select

 

[AlexanderBB]

When my code finishes (formatting the sheet) I have to scroll all the way to the left (if I want to see the worksheet starting from Col A).
If possible Is like to to automate that step but without selecting a cell, as no cell needs to be selected.

 

[My Aswer Is This]

Try this:

Sub Scroll_Me()
'Modified  7/2/2019  1:32:02 AM  EDT
Dim ans As Long
ans = ActiveCell.Column
ActiveWindow.SmallScroll ToRight:=-ans
End Sub

 

[Rick Rothstein]

When my code finishes (formatting the sheet) I have to scroll all the way to the left (if I want to see the worksheet starting from Col A).
If possible Is like to to automate that step but without selecting a cell, as no cell needs to be selected.

Well, one cell always has to be active no matter what. Are you saying you want to leave whatever cell is active still the active cell and scroll left even if that means the active cell will no longer be visible? If so, give this code line a try...

ActiveWindow.ScrollColumn = 1

 

[AlexanderBB]

Cool, that did it! Thanks very much. And Rick too.