que instruccion puedo poner para que no se grabe el nombre de la hoja o como sustituyo esta parte de la macro ActiveWorkbook.Worksheets("PAT 1161 1179 clase") para poder correr la misma macro en diferentes hojas
ActiveWorkbook.Worksheets("PAT 1161 1179 clase").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("PAT 1161 1179 clase").Sort.SortFields.Add Key:=Range( _
"C1"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("PAT 1161 1179 clase").Sort
saludos



