Bestand opstarten zonder werkbalken

[Efsix]

Geachte lezers,

Bij normaal gebruik van Excel heb je natuurlijk werkbalken nodig.
Nu heb ik een (best wel) gecompliceerd bestand gemaakt. Ik zou graag willen dat, wanneer ik dit specifieke bestand open, geen werkbalken in beeld krijg.
Wanneer ik dit afsluit, en een andere werkblad open, moet Excel er weer als vanouds uitzien.

ben erg benieuwd of dit gaat.

groeten, Romé

 

[madmuppet]

Gewoon een macrootje maken met macro-recorder.... en laten uitvoeren direct bij openen bestand, dus in "this workbook" tab ziet dat eruit als:



Private Sub Workbook_Open()

Application.CommandBars("Picture").Visible = False
Application.CommandBars("Drawing").Visible = False
..... en zo verder voor alle overige werkbalken die je wilt uitzetten....

End Sub


om zeker te zijn dat ze weer zichtbaar zijn na sluiten van het bestand, kan je ze weer aanzetten met onderstaande macro in hetzelfde tabblad:


Private Sub Workbook_Close()

Application.CommandBars("Picture").Visible = True
Application.CommandBars("Drawing").Visible = True
..... en zo verder voor alle overige werkbalken die je weer wilt aanzetten .....

End Sub

Houd er wel even rekening mee dat dit NIET betekent dat een gebruiker door het verbergen van deze werkbalken de functies in die balken ook niet kan gebruiken.
De balken worden alleen maar automatisch uitgezet, je kan ze dus handmatig ook gewoon weer aanzetten. Als je dat wilt tegengaan, zal je het bestand ook moeten beveiligen.
Desnoods kan je een bestand met behulp van een macro's zover dicht timmeren, dat specifieke acties (bijvoorbeeld opslaan, printen etc) echt worden uitgeschakeld.

 

[Efsix]

MadMuppet, hartelijk dank voor je reactie. Ik ga er gelijk mee aan de slag.

Deze truc had ik inderdaad ingedachten om mijn file zo veilig mogelijk te maken. De optie, om het werkblad geheel te beveiligen is in mijn geval niet handig, omdat er dan een paar functies (macro's) niet meer werken. Daar zal ongetwijfeld een betere oplossing voor zijn, maar dat is voor mij nog een leer-proces.
Voorlopig ben ik al tevreden met het (automatisch) uitschakelen van bv de formulebalk, om te voorkomen dat 'men' al te nieuwsgierig wordt :thumb:

Nogmaals, dank voor je bijdrage.

groeten, Romé

 

[Efsix]

wat doe ik fout?

De Macro werkt perfect, wanneer ik mijn bestand open. Alle werkbalken zijn pleite.
Echter bij het afsluiten van het bestand, komen ze niet meer automatisch terug.
Doe ik iets verkeerd?


Private Sub Workbook_Open()

Application.DisplayFormulaBar = False
Application.CommandBars("Visual Basic").Visible = False
Application.CommandBars("Reviewing").Visible = False
Application.CommandBars("Formatting").Visible = False
Application.CommandBars("Standard").Visible = False
Application.CommandBars("PDFMaker 6.0").Visible = False
End Sub


Private Sub Workbook_Close()


Application.DisplayFormulaBar = True
Application.CommandBars("Visual Basic").Visible = True
Application.CommandBars("Reviewing").Visible = True
Application.CommandBars("Formatting").Visible = True
Application.CommandBars("Standard").Visible = True
Application.CommandBars("PDFMaker 6.0").Visible = True
End Sub

 

[madmuppet]

Oh, sorry.... activatie moet natuurlijk gebeuren voordat het bestand gesloten wordt. Even de fuctie aanpassen naar

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Application.DisplayFormulaBar = True
Application.CommandBars("Visual Basic").Visible = True
Application.CommandBars("Reviewing").Visible = True
Application.CommandBars("Formatting").Visible = True
Application.CommandBars("Standard").Visible = True
Application.CommandBars("PDFMaker 6.0").Visible = True
End Sub

 

[Efsix]

Kijk, dat werkt.

Klasse, bedankt !