VBA Word 2007 andere schermen sluiten

Status
Niet open voor verdere reacties.

ErikTZR

Gebruiker
Lid geworden
10 sep 2013
Berichten
6
Hallo,

ik ben een beginnend gebruiker van VBA in Word 2007. Nu heb ik een UserForm gemaakt die er voor zorgt dat er makkelijk en snel een technische handleiding geprint kan worrden.
Het UserForm ziet er als volgt uit:
thisdoc.png

De knoppen 'Draaitafel', 'Knikopvoerband', enz. openen een technische handleiding waarin dan weer hetzelfde UserForm tevoorschijn komt.

Nu wil ik het graag zo hebben dat, als ik op één van die knoppen klik en er wordt een nieuwe technische handleiding geopend, dat de oude waarvandaan ik hem geopend heb weer afsluit.
Ik heb al zo'n soort code, maar die werkt niet helemaal zoals ik wil.

Private Sub cmdDraaitafel_Click()



ChangeFileOpenDirectory "C:\Documentgenerator"
Documents.Open FileName:= _
"""Technische Handleiding Draaitafel_versie3.docm""", ConfirmConversions:= _
True, ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _
PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
WritePasswordTemplate:="", Format:=wdOpenFormatAuto, XMLTransform:=""

Documentgenerator.hide


Windows("Documentgenerator02").Activate
ActiveWindows.Close



End Sub



(Verwar niet het document 'Documentgenerator02' met het UserForm 'Documentgenerator')

Op deze manier wordt het document 'Documentgenerator02' pas afgesloten als ik in 'Technische Handleiding Draaitafel_versie3.docm' een actie onderneem. Maar als ik van daaruit weer verder klik naar een andere Handleiding, dan blijven er allemaal documenten openstaan en geeft VBA op een gegeven moment een foutmelding dat hij niet verder kan doordat er nog een dialoogvenster openstaat.

Bij voorbaat dank.

Erik
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan