[ASP + VBA] rechts uitlijnen lukt niet

[Scharnout]

Na veel ploeteren lukt het me om een word docje te spugen. Ik krijg het alleen niet voor elkaar om een paragraaf rechts uit te lijnen.

Dit heb ik:

ASP:

Dim MyDoc
Set MyDoc = CreateObject("Word.Document")
MyDoc.Application.Visible = True
Set MyRange1 = MyDoc.Paragraphs(1).range
With MyRange1
    .Font.Name = "Verdana"
    .Font.Size = 10
    .InsertParagraphBefore
    .ParaGraphFormat.alignment = wdAlignParagraphRight
    .InsertBefore "rechts"
end with
'MyDoc.PrintOut
Set MyDoc = Nothing 

Kan iemand me vertellen wat ik fout doe of de goede code plaatsen?

[Verwijderd]

[Record Macro] onder [Tools] in Word al geprobeerd? Gewoon je uitlijn aktie uitvoeren zoals je normaliter doet en kijken hoe de code eruit ziet...

[Scharnout]

Dan komt het er ook zo uit te zien

Iets anders, want dan is het Selection.ParagraphFormat.Alignment = wdAlignParagraphRight, maar mijn selection is toch MyDoc.Paragraphs(1).range ?

[Verwijderd]

Scharnout schreef op 15 November 2002 @ 11:48:
Dan komt het er ook zo uit te zien

Iets anders, want dan is het Selection.ParagraphFormat.Alignment = wdAlignParagraphRight, maar mijn selection is toch MyDoc.Paragraphs(1).range ?

Dit is voldoende volgens mij:

code:

Selection.Paragraphs(1).Alignment = wdAlignParagraphRight

[Scharnout]

Dan zegt tie:

code:

Microsoft VBScript runtime error '800a01a8' 

Object required: 'Selection' 

/test/word2.asp, line 33

regel 33 is dat wat h ierboven staat

[Scharnout]

schop!

Hij doet dus alles. Fonts, Grootte behalve het uitlijnen.

[Scharnout]

Ik ben eruit. Voor diegene die het in de toekomst ook hebben

wbalign blablabla moet zijn 2

zo simpel kan het zijn ja

[Gert]

Je kan waarschijnlijk ergens wel een file includen die deze variabelen bevat. Ik denk dat Option Explicit je had verteld dat er nu geen wdAlignParagraphRight bestond.