Hej Leo,
1000 tak. Det ser ud til at virke. Nu skal jeg så finde ud af om jeg skal
lande på en vsto (.net) løsning eller om jeg skal lave det med vba. For der
er nemlig samme problem omkring new-eventen i .net. Jeg tror i princippet
også det er det samme der foregår under hjelmen.
i vsto er der også en Application.OnTime. Måske kan jeg få den til at arte
sig.
Igen. 1000 tak for indsatsen.
Mvh. Morten
"Leo Heuser" <leo.heuser@DROPTHISadslhome.dk> skrev i en meddelelse
news:57ii5jF2cv3ulU2@mid.individual.net...
> "news.tele.dk" <mni@jur.ku.fjerndette.dk> skrev i en meddelelse
> news:4613f383$0$48430$edfadb0f@dread16.news.tele.dk...
>> "Leo Heuser" <leo.heuser@DROPTHISadslhome.dk> skrev i en meddelelse
>> news:57i72pF2d0i7aU1@mid.individual.net...
>>> "news.tele.dk" <mni@jur.ku.fjerndette.dk> skrev i en meddelelse
>>> news:46139eed$0$78957$edfadb0f@dread16.news.tele.dk...
>>>> Hej NG,
>>>>
>>>> I word vil jeg gerne have noget vba afviklet i hændelsen document_new
>>>> fra normal.dot. Det virker fint når jeg trykker "nyt dokument" i word,
>>>> men hændelsen afvikles ikke for den første side, der åbnes automatisk
>>>> når man starter word.
>>>>
>>>> Er der nogen der ved hvordan man får fingrene i den side?
>>>>
>>>> Mvh. Morten Nielsen
>>>>
>>>
>>> Hej Morten
>>>
>>> Én måde er at starte Word uden dokument, og så selv
>>> vælge et nyt. Det kan gøres med switchen /n således:
>>>
>>> "G:\Programmer\Microsoft Office XP\Office10\WINWORD.EXE" /n
>>>
>>>
>>> --
>>> Med venlig hilsen
>>> Leo Heuser
>>>
>>> Followup to newsgroup only please.
>>>
>
>>>> Hej Leo,
>>
>> Det var en fin workaround. Mange tak for hurtigt svar.
>> Hvis ikke event'en kan fanges direkte, så bliver det bestemt måden.
>>
>> Mvh. Morten
>>
>
>
> Hej Morten
>
> Velbekomme.
> I mellemtiden har jeg fundet en måde at gøre det på.
> Sæt begge subrutiner i et *almindeligt* modul i Normal.dot
>
> AutoExec afvikles, når Word starter op.
>
> Sub AutoExec()
> Application.OnTime when:=Now, Name:="DoItNow"
> End Sub
>
> Sub DoItNow()
> With Selection
> .InsertAfter "Sådan
"
> .Collapse wdCollapseEnd
> End With
> End Sub
>
>
>
> Med venlig hilsen
> Leo
>
>