What's wrong with this

[mahmed1]

Hi Guys

Sub SelectCell()

Dim ws As Worksheets

ws("Tester").Range("A1").Select
End Sub

Thanks

 

[dave3009]

Try like this

Sub SelectCell()

Dim ws As Worksheets
Set ws = Sheets("Tester")
ws.Range("A1").Select
End Sub

 

[GTO]

Worksheets is a collection, you just want one sheet. After declaring ws as a worksheet, you need to set a reference to the desired sheet. Finally, unless "Tester" is the active sheet, that line will fail as the cell cannot be selected unless the sheet is active.

Try:

Sub SelectCell()
Dim ws As Worksheet
    
    Set ws = ThisWorkbook.Worksheets("Tester")
    ws.Select
    ws.Range("A1").Select
End Sub

 

[VoG]

You would need to select the sheet then the cell, or

Sub SelectCell()
Dim ws As Worksheet
Set ws = Sheets("Tester")
Application.Goto ws.Range("A1")
End Sub

 

[mahmed1]

Thank you all