01. september 2006 - 12:12Der er
5 kommentarer og 2 løsninger
Fjern Højreklik på Fil i Excel
Jeg bruger følgende kode for at få Excel til at køre i vindue, og fjerne mulighed for at Højreklik i menulinjen for oven i Excel. Application.WindowState = xlNormal 'SLET VIS KØRE I FULD VINDUE
Application.Width = 900 'HVIS MINDRE VINDUE Application.Height = 700 'HVIS MINDRE VINDUE
Application.CommandBars("ToolBar List").Enabled = False 'Fjerner Højreklik på den øverste linje i XP (men kun i menulinjen) Men den fil (eller vindue) der køre i Excel kan også minimeres, gendan vindue eller maksimeres. Hvis den IKKE er maksimeret kan man på den blå linje højreklikke og få fat i en menu hvor man kan vælge Gem, Gem som, Udskriv, Sideopsætning, Nyt vindue, Arranger, Zoom, Vis porgramkode.
Kan man ikke fjerne mulighed for højreklik, eller aller helst fjerne menuen Nyt vindue, Arranger og Vis porgramkode.
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Det er denne her du skal bruge CommandBars("Document").Enabled = False
Her er lidt forskellige, som kan nogle af de forskellige ting... ellers kør den sidste og se alle navnene i debuggeren, så kan du prøve dig frem... husk at sætte dem til true igen, hvis ikke du kan se hvad du har gjort....
Sub Testing() CommandBars("Toolbar List").Enabled = False CommandBars("Cell").Enabled = False CommandBars("Column").Enabled = False CommandBars("Row").Enabled = False CommandBars("Ply").Enabled = False CommandBars("Document").Enabled = False End Sub
Sub DebugAllCommandBarNames() Dim cb As CommandBar For Each cb In CommandBars Debug.Print cb.Name Next cb End Sub
jeg kan ikke lige huske have ply gør - men det er jo snart "slut" for i office 2007 kan man fjerne alle office menuer med en kommando :-)
Synes godt om
Ny brugerNybegynder
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.
