Bepaalde pagina openen bij eerste x bestand open.

[DigiCafee]

TS heeft het zwakke punt wel aangeraakt : als een gebruiker een document opent, maar bij het afsluiten niet bewaard zal hij de volgende keer terug als 'eerste gebruiker' bestempeld worden.
Maar daar is uiteraard géén workaround voor : wat niet bewaard wordt kan je een volgende keer niet veronderstellen dat het bekend is...

 

[edmoor]

Geen probleem natuurlijk als je ook ThisWorkbook.Save in de code opneemt.

 

[glda19]

Kun je dat ergens zien dat er naam objecten bewaard zijn

 

[edmoor]

Gewoon in je document.

 

[glda19]

kan ik het naam object ergens terug vinden

 

[edmoor]

Kijk eens bij bericht #6.
Eerder door cow18 ook al verteld.

Verborgen Names kan je alleen met VBA tevoorschijn halen.

 

[glda19]

edmoor post #6 is wel uwe.
Denk niet dat je mij begrijpt.
Je zegt zelf het word bewaard in het document. Waar dan ik dat fysiek zien. En cow18 zegt ook niet waar het staat

 

[edmoor]

Tikfoutje van mij, dat moet niet 6 maar 16 zijn.
En dat heeft cow18 ook gezegd.

 

[glda19]

16 is wel uw eigen post
Maar nu is veel duidelijk geworden plots
Maar moet mij er nog even in verdiepen
Gebruikte zelf naam defineren mijn programma.
Maar nog nooit via code gedaan.
Dus je zou ook naar een range zo een naam kunnen difinieren
Maar hoe dan die naam opvragen in vba

 

[edmoor]

Dat kan je zien in de voorbeeld code die ik plaatste.
Dat zit in de ThisWorkbook.Names collectie.

 

[glda19]

net even de code van post #17 getest.
Waarom
Set EersteKeer = ThisWorkbook.Names(Naam) krijgt eerstekeer Passed
en niet de Naam = Environ("username") & "_FirstTime"

 

[edmoor]

Doet het hier prima.

Wat toont dit?

MsgBox Environ("username") & "_FirstTime"

 

[glda19]

geeft mijn naam met __FirstTime er achter geplakt

 

[edmoor]

Dan moet het gewoon werken.
Hier in ieder geval zonder een enkel probleem.

De naam van het Name object is dan Environ("username") & "_FirstTime"
De waarde zal wanneer gezet Passed zijn.

 

[glda19]

het is hier dat het fout gaat
Set EersteKeer = ThisWorkbook.Names(Naam)
eerstekeer is niet gelijk aan username+ _ firsttime
maar gelijk aan firsttime

 

[edmoor]

De code in #17 is goed, kan ik niks aan veranderen.

 

[glda19]

wat zou eerstekeer normaal moeten krijgen

 

[edmoor]

Deze wordt gezet als dat object nog niet bestaat, zoals in de groene commentaar regels is uitgelegd.

 

[glda19]

wat moet EersteKeer weergeven username+ _firsttime of passed
Want ik krijg passed terug

 

[edmoor]

Klopt.
Zoals ik al zei is username & _FirstTime de naam van het Name object.
De waarde van het object is Passed.