Slette variable række antal i mange faner

Hej

Jeg har en arbejdsfil med mange formler og faner. Når jeg er færdig med arbejdsfilen, skal den distribueres og gemmes på ny sti uden formler. Derudover har jeg behov for en VBA kode der gennemgår de enkelte faner og sletter nogle forud fastdefinerede og individuelle rækker der indeholder nogle beregninger der ikke skal udstilles til modtageren.

Arealet på disse rækker findes både på de enkelte faner, men også på en forside fane hvor man måske med fordel kunne hente det i VBA'en - jeg kan ikke vurdere hvad der er smartest og hurtigts.

Kan nogle hjælpe mig med denne makro, jeg har selv forsøgt med dette :

For Each sh In Worksheets
    Rw = Range("A3")
    sh.Rows(Rw).EntireRow.Delete
    Range("A1").Select
    Next sh


men kan ikke få det helt i mål, idet den benytter ranget i A3 på samtlige faner og det er ikke meningen.

Sig endelig til hvis der er noget der er uklart.

Mvh/Tida