replacing as variables in sort,subtotal macros

Hi Lorenzo

I'd recommend defining a range name for the first cell you want to sort and resizing the range based on the Integer Last Cell

e.g I named cell C2  "SortRef"

Avoiding hard-coding cell references  and sheet names in your code is the key to preventing it from breaking easily as people insert/delete rows and columns or sheets are renamed.

Sub Sort()

    
Dim LastRow As Integer
Dim rngSort As Range

LastRow = 20

   Set rngSort = Range("SortRef").Resize(LastRow, 1)
      
   rngSort.Sort rngSort
   
   Set rngSort = Nothing
       
End Sub

You should avoid referencing sheet names in your code. e.g. "client"

Best to refer to range names or sheet numbers e.g. Sheet1.Activate

The 3, could be set as an Integer which is any number –32,768 to 32,767