change this line:

SrcWbk.Sheets("JUL").Range("b4:ai17").Copy DestWbk.Sheets("62nd").Range("b4:ai17")
to this line:

SrcWbk.Sheets("JUL").Range("b4:ai17").Copy DestWbk.Sheets("62nd").Range("b4")