Avatar billede lordnelson Seniormester
19. januar 2012 - 10:24 Der er 2 kommentarer og
1 løsning

Ekstra Mneu i excel 2010

Hej
Jeg har haft denne kode til at lave ekstra Cammand linje i office -- har så prøvet den i excel 2010 - hvor den kommer med under tilføjelses programmer -- Fint nok -- men nu ønsker jeg den ikke mere og kan ikke se hvordan jeg kommer af med den igen?
Koden for den ekstra menu er;
Sub Auto_Open()

Dim oCommandBar As CommandBar
    Dim oControlInsert As CommandBarButton
    On Error Resume Next
    Set oCommandBar = CommandBars.Item("KPC")

   
    If oCommandBar Is Nothing Then
        Set oCommandBar = CommandBars.Add("KPC", msoBarTop, False, False)

        With oCommandBar
            Set oControlInsert = .Controls.Add(msoControlButton)
            Set oControlindhold = .Controls.Add(msoControlButton)
            .Position = msoBarTop
            .Visible = True
        End With
           
            With oControlInsert
                .BuiltInFace = True
                .FaceId = 218
                .Style = msoButtonIconAndCaption
                .Caption = "Indsæt"
                .TooltipText = "Indsæt billeder"
                .OnAction = "Mod_pictures.COUNTROWS"
               
            End With

       
            With oControlindhold
                .BuiltInFace = True
                .FaceId = 11
                .Style = msoButtonIconAndCaption
                .Caption = "Indholdsfortegnelse"
                .TooltipText = "Indhold"
                .OnAction = "Mod_Content.Content"
               
            End With
       
       
    Else
   
    oCommandBar.Position = msoBarTop
    oCommandBar.Visible = True
   
    End

       


           
       
End If
End Sub
Avatar billede Lene Fredborg Ekspert
19. januar 2012 - 12:22 #1
For lige at være sikker på, at jeg forstår det korrekt:
Har du fundet og slettet selve makroen Auto_Open?
Hvis nej, gør det og gem.
Hvis ja, og hvis toolbaren stadig er på Add-ins-fanen, så gør følgende:
1. Tast Alt+F11 for at åbne makro-editoren (VBE).
2. Tast Ctrl+G for at gå til Immediate Pane (vises som standard nederst i makro-vinduet).
3. Kopier eller indtast følgende linje deri og tast Enter:
CommandBars("KPC").Delete
Løste det problemet?
Avatar billede lordnelson Seniormester
19. januar 2012 - 13:36 #2
Ja har slettet den da' den lå i person og denne er fjernet
men det sidste hjalp Tak
Så du sender lige et svar
Avatar billede Lene Fredborg Ekspert
19. januar 2012 - 13:57 #3
Kommer her.
Da CommandBars ikke benyttes længere i Office 2007 og 2010, har man ikke adgang til at slette via brugergrænsefladen, men man kan stadig generelt manipulere CommandBars via VBA.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester