Rangering

Jeg har i et regneark ca 250 tabeller.
De er på 10 rækker hver og mellem 5-10 kolonner.
Kolonne 1 er afdelingsnavn
Efterfølgende kolonner er budget mål, opnået salg periode og salg åtd.
Den sidste kolonne er målopfyldelse.

Tal til tabellerne hentes via opslag fra en stor datafil.

Pt. er alle tabeller sorteret efter kolonne 1 = afdelingsnavn
Set ønsker jeg at lave om så så de er sorteret efter målopfyldelse.

Hvordan gør jeg det smartest, så jeg ikke skal til at flytte alle opslag til et nyt område i regnearket og så lave rangering med Plads() i den nuværende tabel?
Kan det gøres med en VBA kode eller lægge noget sortering henover det eksisterende?

På forhånd tak!