Køre en makro automatisk, når en projektmappe åbnes

Vigtigt: Denne artikel er maskinoversat. Se ansvarsfraskrivelsen. Du kan finde den engelske version af denne artikel her til din orientering.

Du måske en makro, du har indspillet til at køre automatisk, når du åbner en bestemt projektmappe. Følgende fremgangsmåde bruger et eksempel til at vise, hvordan det fungerer. Du kan også at køre makroer automatisk, når Excel starter.

Inden du starter, skal du kontrollere, at fanen Udvikler vises på båndet. Hvis den ikke gør det, skal du benytte følgende fremgangsmåde:

  1. Klik på Filer > Indstillinger > Tilpas båndet.

  2. Markér afkrydsningsfeltet Udvikler i feltet Hovedfaner under Tilpas båndet.

  3. Klik på OK.

Du kan bruge nedenstående eksempel i din egen projektmappe ved at oprette ark for hver dag i måneden og navngive hver arkfane derefter. Navngiv dem f.eks. 1. marts, 2. marts osv. frem til den 31. marts. Makroen kører automatisk, når du åbner den projektmappe, der viser fanen for den aktuelle dag i måneden.

  1. Klik på Udvikler > Visual Basic.

Gruppen Kode under fanen Udvikler

  1. Klik på Indsæt > Modul.

  2. Indsæt følgende kode i modulet

    Private Sub Auto_Open()
    nedtone vntToday som Variant
    vntToday = WorksheetFunction.Text (dato, "mmmm dd")
    på fejlen CV næste
    Sheets(vntToday). Vælg
    Hvis fejl <> 0 derefter
    MsgBox "Regneark ikke findes."
    Mere
    Range("A1"). Vælg
    slut hvis
    End Sub

  3. Luk Visual Basic (du skal ikke gemme).

  4. Gem projektmappen som en Excel-projektmappe med aktive makroer (*.xlsm), og luk den.

Næste gang du åbner projektmappen, vælges den aktuelle dag med markøren placeret i celle A1. Hvis den pågældende dags regneark ikke findes, vises meddelelsen “Regnearket findes ikke”.

Tip: Du kan oprette en ny projektmappe for hver måned, når den dukker op, og oprette makroen igen for den nye projektmappe.

Bemærk: Ansvarsfraskrivelse for maskinoversættelse: Denne artikel er blevet oversat af et computersystem uden menneskelig indgriben. Microsoft tilbyder disse maskinoversættelse for at hjælpe ikke-engelsktalende brugere til at kunne nyde indhold om Microsofts produkter, tjenester og teknologier. Da artiklen er maskinoversat, kan den indeholde forkerte ord eller syntaks- eller grammatikfejl.

Udvid dine færdigheder
Gå på opdagelse i kurser
Få nye funktioner først
Bliv Office Insider

Var disse oplysninger nyttige?

Tak for din feedback!

Tak for din feedback! Det lyder, som om det vil kunne hjælpe, hvis du bliver sat i forbindelse med en af vores Office-supportteknikere.

×