Word文書の中央のテキスト

Wordドキュメントを作成するスクリプトを作成していますが、テキストを中央揃えにすることはできません。これが私が使用しているコードの例です。（VBScript）

set objword = createobject("word.application")
set doc = objword.documents.add
set selection = objword.selection
selection.Font.name = "arial" 
selection.Font.size = "20"
selection.Font.Bold = true
selection.Paragraphs.Alignment = wdAlignParagraphCenter
selection.typetext "This is the title that should be centered"
selection.typeparagraph
doc.saveas("testdoc.doc")
objword.Quit
set objword = nothing

Googleで見つけたいくつかの異なることを試しましたが、機能するものは何も見つかりませんでした。

更新：wdAlignParagraphCenterのような定数は実際には定義されていない可能性があるため、コードで確認してください。

Word（またはExcel）で書式設定を行う方法の例を取得する最も簡単な方法は、実際にマクロの記録を開始し、必要な処理を行い、記録を停止してマクロの内容を確認することです。

サンプルコードでは、テキストを中央に配置しようとする兆候は見られません。のようなものを試してみてくださいがselection.ParagraphFormat.Alignment = wdAlignParagraphCenter、それは実際に試してからではなく、ドキュメントから取得されます。

もう少し実験した後、wdAlignParagraphCenterの値は1になりますが、vbsからはそうではありません。VBScriptのドキュメントを掘り下げて、これがどこで定義されているかなどを正確に把握することは、読者の課題として残されています。

また、ドキュメントを読み通してください。WordのコードエディタからアクセスできるVisual Basicリファレンスには、おそらく役立つ情報があります。

（少なくとも私の長年の経験では）Wordでできることは、正しく機能する同等のコードを持っていないこともありますが、おそらくWordBasicの時代から改善されているかもしれません。

Set objWord = CreateObject("word.application")
Set objDoc = objWord.Documents.Add
Set objSelection = objWord.Selection
objSelection.Font.Name = "arial"
objSelection.Font.Size = "20"
objSelection.Font.Bold = True
objSelection.Paragraphs.Alignment = wdAlignParagraphCenter
objSelection.typetext "This is the title that should be centered"
objSelection.typeparagraph
objDoc.saveas ("testdoc.doc")
objWord.Quit
Set objWord = Nothing

%% Start by creating a Word Document
    Word_COM = actxserver('Word.Application');
    set(Word_COM,'visible',1);
    RAM_Report = invoke(Word_COM.documents,'add');
    invoke(RAM_Report.paragraphs,'add');
    ReportDoc = Word_COM.Selection;

%% ReprtDoc Created   
    ReportDoc.Paragraphs.Alignment = 1;
    MyTextWithLineFeed = sprintf('%s\n','Hello World');
    ReportDoc.TypeText( MyTextWithLineFeed );