Åbne dokumentegenskaber sammen med dokumenter

Så vidt jeg ved kan du ikke gøre det automatisk ved Åbning. Kun ved Lukning, og tilsyneladende kan man ikke direkte fra kode kalde denne funktion, men du kan komme et stykke ad vejen ved at lægge følgende kode, på dokuments open-hændelse:

Dialogs(wdDialogFileSummaryInfo).Display

Åbn dokumentet - tryk Alt+F11.

I ruden til venstre dobbeltklikker du på ThisDocument.

Kopier denne kode ind:

Private Sub Document_Open()
Dialogs(wdDialogFileSummaryInfo).Display
End Sub

Gem dokumentet. Hvis det skal gælde for nye dokumenter, skal du bruge Private Sub Document_New()i stedet, og så skal koden lægges i dokumentskabelonen.

Det er fint nok, men kan man ikke gemme noget i egenskaberne? F.eks. skrive noget i kommentarfeltet?
/tschmidt

Min fejl. Ret Display til Show. Altså

Dialogs(wdDialogFileSummaryInfo).Show