få makro til at afslutte i ark1

Jeg har lavet en makro med følgende kode:

Sub sletUdvalgte()
Const ark1c = "C14:C22,C26,C28,C30,C35,E15,F14:F22,F26,F28,F30,F35,H15"
Const ark1r = "C13,F13"
Const ark1b = "H2:H7"
Const ark2c = "C20,C21,C23,C29,C30,C35,E15,F20,F21,F23,F29,F30,F35,H15"
Const ark2r = "C21,F21"
Const ark3c = "C20:C23,C26,C29,C30,C35,E15,F20:F23,F26,F29,F30,F35,H15"
Const ark3r = "C21,F21,C23,F23"

    nulstil 1, ark1c, 0
    nulstil 1, ark1r, "-"
    nulstil 1, ark1b, " "      'eller "" henholds blank= " " tom = ""
    nulstil 2, ark2c, 0
    nulstil 2, ark2r, "-"
    nulstil 3, ark3c, 0
    nulstil 3, ark3r, "-"
End Sub
Private Sub nulstil(ArkNr, område, tegn)
    Worksheets(ArkNr).Activate
    Range(område).Select
    Selection.Value = tegn
End Sub

Jeg vil gerne have at når makroen bliver afspillet, så går den automatisk tilbage i ark1.