• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

menubalk niet meer tonen

Status
Niet open voor verdere reacties.

rotrax

Gebruiker
Lid geworden
20 jun 2003
Berichten
99
weet iemand hoe ik de menubalk niet zichtbaar kan maken (of uitschakelen) tijdens het openen van een worksheet?
 
ik zou denken,( maar weet het niet zeker) beeld,werkbalken misschien,of bedoel je dat niet?
 
nee dat bedoel ik niet.

ik bedoel de standaard menubalk

(bestand,bewerken,beeld, etc)
 
als je met rechts klikt op die werkbalk, krijg je een lijst met alle werkbalken (die je evt aan of uit kan vinken) en onderaan staat als het goed is "aanpassen".
Hier kies je voor en vervolgens vink je "werkbladmenubalk" uit en weg is je werkbalk

groetjes
Jordi
 
Welke wil je uitschakelen? kies er maar één. :)

Application.Displayformulabar=FALSE

COPY UITSCHAKELEN
Application.Commandbars("EDIT").CONTROLS(3).ENABLED=FALSE

PASTE UITSCHAKELEN
Application.Commandbars("EDIT").CONTROLS(4).ENABLED=FALSE

MENU BALK UITSCHAKELEN
Application.Commandbars("WORKSHEET MENU BAR").ENABLED=FALSE

FORMATTING BALK UITSCHAKELEN
Application.CommandBars("Formatting").Enabled = FALSE

STANDAARD BALK UITSCHAKELEN
Application.CommandBars("STANDARD").Enabled = False

Heel menu in menubalk uitschakelen.
APPLICATION.COMMANDBARS("EDIT").ENABLED=FALSE

Vergeet niet dat wanneer je Excel afsluit, de Enabled=False balken op true te zetten.
 
Ik zie al wat ik fout had gedaan ik had ipv enabled visible gedaan

maar nu we toch zo bezig zijn... ;-)

ook al staan de balken allemaal uit de sneltoetsen doen het nog gewoon kan je die ook uitzetten....
 
Het is iets met application onkey, ik heb even voor je gezocht, Application Onkey

Wil je nu ook nog de rechtermuisknop uitschakelen.
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
End Sub
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan