方法 : ドキュメントに画像およびワードアートを追加する

2010-04-28

更新 : 2007 年 11 月

対象
このトピックの情報は、指定された Visual Studio Tools for Office プロジェクトおよび Microsoft Office のバージョンにのみ適用されます。プロジェクトの種類ドキュメントレベルのプロジェクトアプリケーションレベルのプロジェクト Microsoft Office のバージョン Word 2003 Word 2007 詳細については、「アプリケーションおよびプロジェクトの種類別の使用可能な機能」を参照してください。

このトピックの情報は、指定された Visual Studio Tools for Office プロジェクトおよび Microsoft Office のバージョンにのみ適用されます。

プロジェクトの種類

ドキュメントレベルのプロジェクト
アプリケーションレベルのプロジェクト

Microsoft Office のバージョン

Word 2003
Word 2007

詳細については、「アプリケーションおよびプロジェクトの種類別の使用可能な機能」を参照してください。

デザイン時または実行時に、ドキュメントに画像および描画オブジェクトを追加できます。ワードアートを使うと、装飾的なテキストを Microsoft Office Word ドキュメントに追加できます。この特殊効果テキストは描画オブジェクトでできており、カスタマイズしてドキュメントに挿入できます。

デザイン時における画像の追加

ドキュメントレベルのカスタマイズを作成する場合は、デザイン時に画像をドキュメントに追加できます。その手順は Word 2003 と Word 2007 で異なります。

デザイン時に Word 2003 ドキュメントに画像を追加するには

ドキュメント内で画像を挿入する位置にカーソルを置きます。
[挿入] メニューの [図] をクリックし、次に [ファイルから] をクリックします。
[図の挿入] ダイアログボックスで、挿入する画像に移動し、[挿入] をクリックします。

ドキュメント内の現在のカーソル位置に画像が追加されます。

デザイン時に Word 2007 ドキュメントに画像を追加するには

ドキュメント内で画像を挿入する位置にカーソルを置きます。
リボンの [挿入] タブをクリックします。
[図] グループの [図] をクリックします。
[図の挿入] ダイアログボックスで、挿入する画像に移動し、[挿入] をクリックします。

ドキュメント内の現在のカーソル位置に画像が追加されます。

実行時における画像の追加

ドキュメント内の現在のカーソル位置に画像を挿入できます。

カーソル位置に画像を挿入するには

InlineShapes オブジェクトの AddPicture メソッドを呼び出して、ファイル名を渡します。

Me.Application.Selection.InlineShapes.AddPicture("C:\SamplePicture.jpg")

this.Application.Selection.InlineShapes.AddPicture(@"C:\SamplePicture.jpg", 
    ref missing, ref missing, ref missing);

デザイン時におけるワードアートの追加

ドキュメントレベルのカスタマイズを作成する場合は、デザイン時にワードアートをドキュメントに追加できます。その手順は Word 2003 と Word 2007 で異なります。

デザイン時に Word 2003 ドキュメントにワードアートを追加するには

ドキュメント内でワードアートを挿入する位置にカーソルを置きます。
[挿入] メニューの [図] をクリックし、次に [ワードアートの挿入] をクリックします。
[ワードアートギャラリー] ダイアログボックスで [ワードアートスタイル] を選択し、[OK] をクリックします。
[ワードアートテキストの編集] ダイアログボックスでドキュメント内に表示するテキストを追加し、[OK] をクリックします。

選択したワードアートスタイルでこのテキストがドキュメントに追加されます。

デザイン時に Word 2007 ドキュメントにワードアートを追加するには

ドキュメント内でワードアートを挿入する位置にカーソルを置きます。
リボンの [挿入] タブをクリックします。
[テキスト] グループの [ワードアート] をクリックし、ワードアートスタイルを選択します。
[ワードアートテキストの編集] ダイアログボックスでドキュメント内に表示するテキストを追加し、[OK] をクリックします。

選択したワードアートスタイルでこのテキストがドキュメントに追加されます。

実行時におけるワードアートの追加

ドキュメント内の現在のカーソル位置にワードアートを挿入できます。その手順は、ドキュメントレベルのカスタマイズとアプリケーションレベルのアドインでは異なります。

ドキュメントレベルのカスタマイズのカーソル位置にワードアートを追加するには

現在のカーソル位置の左上の位置を取得します。

Dim leftPosition As Double = Me.Application.Selection.Information( _
    Word.WdInformation.wdHorizontalPositionRelativeToPage)

Dim topPosition As Double = Me.Application.Selection.Information( _
    Word.WdInformation.wdVerticalPositionRelativeToPage)

float leftPosition = (float)this.Application.Selection.get_Information(
    Word.WdInformation.wdHorizontalPositionRelativeToPage);

float topPosition = (float)this.Application.Selection.get_Information(
    Word.WdInformation.wdVerticalPositionRelativeToPage);

ドキュメント内で Shapes オブジェクトの AddTextEffect メソッドを呼び出します。

Me.Shapes.AddTextEffect( _
    Office.MsoPresetTextEffect.msoTextEffect29, "SampleText", _
    "Arial Black", 24, _
    Office.MsoTriState.msoFalse, Office.MsoTriState.msoFalse, _
    leftPosition, topPosition)

this.Shapes.AddTextEffect(
    Office.MsoPresetTextEffect.msoTextEffect29, "SampleText",
    "Arial Black", 24, 
    Office.MsoTriState.msoFalse, Office.MsoTriState.msoFalse,
    leftPosition, topPosition, ref missing);

アプリケーションレベルのアドインのカーソル位置にワードアートを追加するには

現在のカーソル位置の左上の位置を取得します。

Dim leftPosition As Double = Me.Application.Selection.Information( _
    Word.WdInformation.wdHorizontalPositionRelativeToPage)

Dim topPosition As Double = Me.Application.Selection.Information( _
    Word.WdInformation.wdVerticalPositionRelativeToPage)

float leftPosition = (float)this.Application.Selection.get_Information(
    Word.WdInformation.wdHorizontalPositionRelativeToPage);

float topPosition = (float)this.Application.Selection.get_Information(
    Word.WdInformation.wdVerticalPositionRelativeToPage);

ドキュメント内で Shapes オブジェクトの AddTextEffect メソッドを呼び出します。

Me.Application.ActiveDocument.Shapes.AddTextEffect( _
    Office.MsoPresetTextEffect.msoTextEffect29, "SampleText", _
    "Arial Black", 24, Office.MsoTriState.msoFalse, _
    Office.MsoTriState.msoFalse, leftPosition, topPosition)

this.Application.ActiveDocument.Shapes.AddTextEffect(
    Office.MsoPresetTextEffect.msoTextEffect29, "SampleText",
    "Arial Black", 24, Office.MsoTriState.msoFalse, 
    Office.MsoTriState.msoFalse, leftPosition, topPosition, ref missing);