Добрый день, строка в макросе сортировки таблицы (записана в макрорекордере) выделяет указаный диапазон .SetRange Range("A:H") , но данные бывают ненормированно и в столбцах A:IA, как изменить код что бы было выдеена вся таблица
Код
Cells.Select
ActiveWorkbook.Worksheets("Worksheet").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Worksheet").Sort.SortFields.Add Key:=Range("A1"), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortTextAsNumbers
With ActiveWorkbook.Worksheets("Worksheet").Sort
.SetRange Range("A:H")
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With