Autoexec

[Aljohn]

Hallo,

Als ik mijn sjabloon als doc opstart dan begint hij niet in een tekstveld van een vorm, maar er onder.
Nu wil ik hem in het tekstveld van de eerste vorm laten beginnen.
Deze heb ik een bladwijzer "Begin" gegeven.
Dus als ik hem opstart zal hij macro "Autoexec" uitvoeren, alleen ik krijg het programma niet voormekaar
Hoe moet het programma eruit komen te zien?
Moet ik de beveiliging er ook afhalen?
Het document word als bijlage meegestuurd

Met vriendelijke groet,
Aljohn
Het wachtwoord voor de beveiliging is 12345678

 

[snb]

Ik tref geen autoexec aan.
Suggestie:
werk met een tabel met 2 kolommen en 10 rijen
maak de 2e kolom zo breed als de pijl die je wil hebben.
verwijder de lijnen in de 2e kolom
splits iedere cel in de 2e kolom in 2 rijen.
teken per cel in kolom2 diagonale lijnen: klaar.
De cursor zal in cel1 van de tabel beginnen.

 

[Aljohn]

Bedankt voor de suggestie maar heb het toch met een macro weten op te lossen.
de volgende macro is het geworden

Sub Autonew()
'
' Autonew Macro
'
'

WordBasic.ToolsUnprotectDocument DocumentPassword:="12345678"
    ActiveDocument.Shapes("AutoShape 2").Select
    Selection.GoTo What:=wdGoToBookmark, Name:="Begin"
    With ActiveDocument.Bookmarks
        .DefaultSorting = wdSortByName
        .ShowHidden = True
    End With
    
    ActiveDocument.Protect Password:="12345678", NoReset:=False, Type:= _
        wdAllowOnlyReading, UseIRM:=False, EnforceStyleLock:=False
End Sub

Met vriendelijke groet,
aljohn