Opslaan als button & verbergen van elementen

[eddyengelhart]

Hoi allemaal,

Ik ben bezig met het opstellen van een vragenlijst en daarbij wil ik graag om jullie hulp vragen. Ik loop namelijk tegen de volgende zaken aan:

- Toevoegen van een 'Save as' button (bezig geen VBA kennis, dus dat maakt het extra lastig)
- Verbergen van alle elementen zoals taakbalken, het lint, koppen, tabbladen, schuifbalken, etc.

Het is dus de bedoeling dat de excel file Bekijk bijlage test1.xlsx opstart als een soort executable, waarbij de Excel omgeving tot een minimum beperkt wordt.

Graag hoor ik jullie tips!

Alvast bedankt.

Mvg,

Eddy

 

[wieter]

Ik heb de code's voor [fullscreen] en [exit fullscreen] voorlopig achter knoppen gezet,
want als je onderstaande code's gebruikt, kan je niet meer terug naar het normale scherm.
Om de schuifbalken weg te doen, moet je vooraf: Bestand>Opties>Geavanceerd>Weergave
de vinkjes weghalen.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
FullscreenExit
End Sub

Private Sub Workbook_Open()
Fullscreen
End Sub

Bekijk bijlage test1 (1).xlsm

 

[wieter]

Ik heb je bestand aangepast, zodat het werkt zoals je wenst.
De knop "Exit Fullscreen" heb ik laten staan, zodat je toch nog naar het normale beeld kan.

Bekijk bijlage test1 (1).xlsm