Как я могу изменить этот код, чтобы ссылаться на ячейки на другом листе

Question

Sub SortDataWithoutHeader()
Range("A1", Range("A1").End(xlDown)).Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlNo
End Sub

мои интерфейсные кнопки находятся на листе под названием «инструменты», а обрабатываемые данные находятся на листе под названием «данные»

Answer 1

Примерно так. Здесь может оказаться полезным оператор With. Обратите внимание на точки перед каждым вызовом Range, Cells и Rows в блоке With. Точка необходима для ссылки на ws, то есть на нужный вам лист.

Sub SortDataWithoutHeader()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Worksheets("Data")
    
    With ws
        Dim lastRow As Long
        lastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
        
        .Range("A1:A" & lastRow).Sort Key1:=.Range("A1"), Order1:=xlAscending, Header:=xlNo
    End With
End Sub