Dansk Regneark Forum
  Hjælp Hjælp  Søg i forum   Arrangementer   Opret ny bruger Opret ny bruger  Log ind Log ind


Emne lukketAutomatisk afvikling af makro

 Besvar Besvar
Forfatter
Brig Se dropdown
Forum Begynder
Forum Begynder


Medlem: 08.Jan.2014
Land: DK
Status: Offline
Point: 3
Direkte link til dette indlæg Emne: Automatisk afvikling af makro
    Sendt: 08.Jan.2014 kl. 00:24
Hej, jeg har lavet et omfattende skema i excel, hvor der er en del grupperinger. Derudover har jeg beskyttet dele af dokumentet, da jeg har nogle totaler og beregningsfelter, som ikke skal overskrives. Da det giver problemer har jeg prøvet at bruge en makrokode til at få det til at fungere (fandt den i en tråd på denne side), og det gør det såmænd også... jeg skal bare ind og køre makroen hver gang jeg åbner filen for at jeg kan få lov til at udvide grupperingerne, hvilket ikke er holdbart. Er der nogen der har en god løsning til hvordan jeg får makroen til at køre automatisk hver gang dokumentet åbnes? Jeg skal have nogle andre medarbejdere til at bruge dokumentet til at taste timer ind i og de kan mildest talt lave ragnarok, hvis jeg ikke kan få arkbeskyttelsen til at virke

Den kode jeg kører er:

Sub Grupper()
ActiveSheet.Protect Password:="123", UserInterfaceOnly:=True
ActiveSheet.EnableOutlining = True
End Sub


Til top



Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5419
Direkte link til dette indlæg Sendt: 08.Jan.2014 kl. 12:53
Yeps, brug 'Workbook_Open' eventen :-)

Den klarer det hele for dig - kig evt. i hjælp, hvordan du opretter den, men ellers er det bare at opretten makro, der hedder 'Workbook_Open' inde i 'ThisWorkbook' objektet.

Prøv evt. denne lille makro, i 'ThisWorkbook' objektet først:
Private Sub Workbook_Open()

      MsgBox "Hello World"

End Sub

Husk, at trykke på [Tak], hvis du kan lide et indlæg.
Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag.
Til top
Brig Se dropdown
Forum Begynder
Forum Begynder


Medlem: 08.Jan.2014
Land: DK
Status: Offline
Point: 3
Direkte link til dette indlæg Sendt: 08.Jan.2014 kl. 13:15
Tusind tak, det virker. Det kan være du kan hjælpe mig med et supplerende spørgsmål.

Jeg skal gerne have indopereret følgende tilladelser i makroen, som jeg almindeligvis ville have slået til under arkbeskyttelsen. Kan du/I hjælpe mig med hvilke stumper kode jeg skal skrive?

markere ulåste celler
markere låste celler
formater rækker
indsæt rækker
slet rækker

Med venlig hilsen

Brian A. Graugaard
Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5419
Direkte link til dette indlæg Sendt: 08.Jan.2014 kl. 13:20
ActiveSheet.Protect AllowFormattingRows:=True, AllowInsertingRows:=True, AllowDeletingRows:=True


Husk, at trykke på [Tak], hvis du kan lide et indlæg.
Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag.
Til top
 Besvar Besvar

Skift forum Forum tilladelser Se dropdown

© 2010 - 2024 Dansk Regneark Forum - en del af Excel-regneark.dk