Erik, ik ben het 100% met je eens voor wat betreft

Gebruikers vinden het onaangenaam als je in de menus gaat "prutsen". Het kan ook tot moeilijkheden leiden. Inderdaad een "paardenmiddel" wat ik steeds weiger op te nemen in projecten

Ik heb me inderdaad een keer laten verleiden door een gebruiker... FOUT, FOUT, FOUT!

Easy, Het idee van Erik om het te doen via

de workbookmodule bestaat een "sheetactivate" (en "sheetdeactivate") event

is een goed idee. Kan je daar zelf wat mee?

Nog ff dit. Als een gebruiker via een knop op de 'HOME'-sheet een andere sheet kan 'openen', hoe ga je dan van die 'andere sheet' weer terug naar 'HOME"?

Groet, Leo

Easy,

Dit is de manier waarop we met code kunnen leren spelen.
Eerst macro opnemen: rasterlijnen, rij- en kolomkoppen & tabs verbergen.
Sub settings()
'
' settings Macro
' Erik Van Geit 070905 2055
'

'
    With ActiveWindow
        .DisplayGridlines = False
        .DisplayHeadings = False
        .DisplayWorkbookTabs = False
    End With
End Sub
Ga naar "thisworkbook" module
In de linker combobox (deze staat zowat in het midden bovenaan van je scherm & de huidige waarde is waarschijnlijk "(algemeen)") selecteer je "workbook".
Er verschijnt nu de standaardcode, die je eventueel kan gebruiken om het programma te openen met de "HOME"page
Private Sub Workbook_Open()

End SubIn de rechter combobox selecteer je"SheetActivate".
Nu krijg je weer - gratis voor niets - een "lege" eventcode  (gebeurteniscode)
Private Sub Workbook_SheetActivate(ByVal Sh As Object)

End SubMiddenin plaats je settings (of althans de naam van de macro) zodat bij elke activatie van een sheet de macro "settings" wordt aangeroepen.

Bij mij ziet de module "thisworkbook" er nu zo uit:
Option Explicit

Private Sub Workbook_Open()
Sheets("HOME").Select
End Sub

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
settings
End Sub
beste groeten,
Erik

zet er maar een lijntje voor
On Error Resume Next
(zoek dat maar op in de VBAhelpfiles)
Sub settings()
...
On Error Resume Next

    With ActiveWindow
        .DisplayGridlines = False
...in het algemeen is het aan te raden zuinig te zijn met dat lijntje, want geen enkele bug wordt nog gemeld, maar in zo'n korte macro kan het gerust

Dit is de braafste versie, die ik zelf altijd toepas: "on error resume next" net voor de lijnen die de fout kunnen veroorzaken en onmiddellijk "on error goto 0" er achter (kan je beschouwen als een "reset" van de "on error", dus vanaf daar worden alle bugs terug gemeld.
Sub settings()

    With ActiveWindow
        On Error Resume Next
        .DisplayGridlines = False
        .DisplayHeadings = False
        On Error GoTo 0
        .DisplayWorkbookTabs = False
    End With

End Sub
slaap zacht,
Erik

Easy, ik zou zeggen 'graag gedaan' en 'laat maar komen die problemen'. 

Groet, Leo