Excel - Problemer med subtotaler og sorter efter clearing af ark.

Min applikation gør det at den henter en del data fra forskellige databaser,og præsentere dem for brugeren. Nu ville jeg gerne være i stand til at hente nye oplysninger ind på mine oprindelige ark efter at jeg har clearet dem.
Jeg clearer dem på følgende måde:

Worksheets("A").Select
Worksheets("A").Range("A:Q").Clear
Cells.Select
Selection.ClearContents

På arkene sættes også subtotaler ind, efter at jeg har sorteret mine oplysninger i alfabetisk orden.
Det virker dog somom der gemmes oplysninger i arket jeg ikke får clearet, for når jeg henter data anden gang, bliver subtotalerne blandet ind imellem hinanden, og de står ikke i alfabetisk orden mere... Den samlede total værdi er korrekt, men den alfabetiske orden er ødelagt.
Håber I kan hjælpe på forhånd tak.