ControlCollection.AddPictureContentControl メソッド
定義
重要
一部の情報は、リリース前に大きく変更される可能性があるプレリリースされた製品に関するものです。 Microsoft は、ここに記載されている情報について、明示または黙示を問わず、一切保証しません。
オーバーロード
AddPictureContentControl(Range, String) |
ドキュメント内の指定した範囲に新しい PictureContentControl を追加します。 |
AddPictureContentControl(String) |
ドキュメントの現在の選択範囲に新しい PictureContentControl を追加します。 |
AddPictureContentControl(ContentControl, String) |
ドキュメント内のネイティブなコンテンツ コントロールに基づいた新しい PictureContentControl を追加します。 |
AddPictureContentControl(Range, String)
ドキュメント内の指定した範囲に新しい PictureContentControl を追加します。
public:
Microsoft::Office::Tools::Word::PictureContentControl ^ AddPictureContentControl(Microsoft::Office::Interop::Word::Range ^ range, System::String ^ name);
public Microsoft.Office.Tools.Word.PictureContentControl AddPictureContentControl (Microsoft.Office.Interop.Word.Range range, string name);
abstract member AddPictureContentControl : Microsoft.Office.Interop.Word.Range * string -> Microsoft.Office.Tools.Word.PictureContentControl
Public Function AddPictureContentControl (range As Range, name As String) As PictureContentControl
パラメーター
- name
- String
新しいコントロールの名前。
戻り値
ドキュメントに追加された PictureContentControl。
例外
name
は、null
であるか、または長さがゼロです。
ControlCollection に既に同じ名前のコントロールがあります。
例
次のコード例では、ドキュメントの先頭に新しい PictureContentControl を追加します。 この例では、 という名前 picture.bmp
のファイルが 、%UserProfile%\My Documents フォルダー (Windows XP 以前の場合) または %UserProfile%\Documents フォルダー (Windows Vista の場合) に存在することを前提としています。
このバージョンは、ドキュメント レベルのカスタマイズ用です。 このコードを使用するには、プロジェクトの ThisDocument
クラスに貼り付け、 メソッドから メソッドをAddPictureControlAtRange
ThisDocument_Startup
呼び出します。
private Microsoft.Office.Tools.Word.PictureContentControl pictureControl2;
private System.Drawing.Bitmap bitmap2;
private void AddPictureControlAtRange()
{
this.Paragraphs[1].Range.InsertParagraphBefore();
pictureControl2 = this.Controls.AddPictureContentControl(
this.Paragraphs[1].Range, "pictureControl2");
string imagePath = System.Environment.GetFolderPath(
Environment.SpecialFolder.MyDocuments) + "\\picture.bmp";
bitmap2 = new System.Drawing.Bitmap(imagePath, true);
pictureControl2.Image = bitmap2;
}
Dim pictureControl2 As Microsoft.Office.Tools.Word.PictureContentControl
Dim bitmap2 As System.Drawing.Bitmap
Private Sub AddPictureControlAtRange()
Me.Paragraphs(1).Range.InsertParagraphBefore()
pictureControl2 = Me.Controls.AddPictureContentControl(Me.Paragraphs(1).Range, "pictureControl2")
Dim imagePath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & _
"\picture.bmp"
bitmap2 = New System.Drawing.Bitmap(imagePath, True)
pictureControl2.Image = bitmap2
End Sub
このバージョンは、.NET Framework 4 または .NET Framework 4.5 を対象とするアプリケーション レベルのアドイン用です。 このコードを使用するには、プロジェクトの ThisAddIn
クラスに貼り付け、 メソッドから メソッドをAddPictureControlAtRange
ThisAddIn_Startup
呼び出します。
private Microsoft.Office.Tools.Word.PictureContentControl pictureControl2;
private System.Drawing.Bitmap bitmap2;
private void AddPictureControlAtRange()
{
if (this.Application.ActiveDocument == null)
return;
Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
vstoDoc.Paragraphs[1].Range.InsertParagraphBefore();
pictureControl2 = vstoDoc.Controls.AddPictureContentControl(
vstoDoc.Paragraphs[1].Range, "pictureControl2");
string imagePath = System.Environment.GetFolderPath(
Environment.SpecialFolder.MyDocuments) + "\\picture.bmp";
bitmap2 = new System.Drawing.Bitmap(imagePath, true);
pictureControl2.Image = bitmap2;
}
Dim pictureControl2 As Microsoft.Office.Tools.Word.PictureContentControl
Dim bitmap2 As System.Drawing.Bitmap
Private Sub AddPictureControlAtRange()
If Me.Application.ActiveDocument Is Nothing Then
Return
End If
Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
vstoDoc.Paragraphs(1).Range.InsertParagraphBefore()
pictureControl2 = vstoDoc.Controls.AddPictureContentControl( _
vstoDoc.Paragraphs(1).Range, "pictureControl2")
Dim imagePath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & _
"\picture.bmp"
bitmap2 = New System.Drawing.Bitmap(imagePath, True)
pictureControl2.Image = bitmap2
End Sub
注釈
実行時にドキュメント内の指定した範囲に新しい PictureContentControl を追加するには、このメソッドを使用します。 詳細については、「 Adding Controls to Office Documents at Run Time」を参照してください。
適用対象
AddPictureContentControl(String)
ドキュメントの現在の選択範囲に新しい PictureContentControl を追加します。
public:
Microsoft::Office::Tools::Word::PictureContentControl ^ AddPictureContentControl(System::String ^ name);
public Microsoft.Office.Tools.Word.PictureContentControl AddPictureContentControl (string name);
abstract member AddPictureContentControl : string -> Microsoft.Office.Tools.Word.PictureContentControl
Public Function AddPictureContentControl (name As String) As PictureContentControl
パラメーター
- name
- String
新しいコントロールの名前。
戻り値
ドキュメントに追加された PictureContentControl。
例外
name
は、null
であるか、または長さがゼロです。
ControlCollection に既に同じ名前のコントロールがあります。
例
次のコード例では、ドキュメントの先頭に新しい PictureContentControl を追加します。 この例では、 という名前 picture.bmp
のファイルが 、%UserProfile%\My Documents フォルダー (Windows XP 以前の場合) または %UserProfile%\Documents フォルダー (Windows Vista の場合) に存在することを前提としています。
このバージョンは、ドキュメント レベルのカスタマイズ用です。 このコードを使用するには、プロジェクトの ThisDocument
クラスに貼り付け、 メソッドから メソッドをAddPictureControlAtSelection
ThisDocument_Startup
呼び出します。
private Microsoft.Office.Tools.Word.PictureContentControl pictureControl1;
private System.Drawing.Bitmap bitmap1;
private void AddPictureControlAtSelection()
{
this.Paragraphs[1].Range.InsertParagraphBefore();
this.Paragraphs[1].Range.Select();
pictureControl1 = this.Controls.AddPictureContentControl("pictureControl1");
string imagePath = System.Environment.GetFolderPath(
Environment.SpecialFolder.MyDocuments) + "\\picture.bmp";
bitmap1 = new System.Drawing.Bitmap(imagePath, true);
pictureControl1.Image = bitmap1;
}
Dim pictureControl1 As Microsoft.Office.Tools.Word.PictureContentControl
Dim bitmap1 As System.Drawing.Bitmap
Private Sub AddPictureControlAtSelection()
Me.Paragraphs(1).Range.InsertParagraphBefore()
Me.Paragraphs(1).Range.Select()
pictureControl1 = Me.Controls.AddPictureContentControl("pictureControl1")
Dim imagePath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & _
"\picture.bmp"
bitmap1 = New System.Drawing.Bitmap(imagePath, True)
pictureControl1.Image = bitmap1
End Sub
このバージョンは、.NET Framework 4 または .NET Framework 4.5 を対象とするアプリケーション レベルのアドイン用です。 このコードを使用するには、プロジェクトの ThisAddIn
クラスに貼り付け、 メソッドから メソッドをAddPictureControlAtSelection
ThisAddIn_Startup
呼び出します。
private Microsoft.Office.Tools.Word.PictureContentControl pictureControl1;
private System.Drawing.Bitmap bitmap1;
private void AddPictureControlAtSelection()
{
if (this.Application.ActiveDocument == null)
return;
Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
vstoDoc.Paragraphs[1].Range.InsertParagraphBefore();
vstoDoc.Paragraphs[1].Range.Select();
pictureControl1 = vstoDoc.Controls.AddPictureContentControl("pictureControl1");
string imagePath = System.Environment.GetFolderPath(
Environment.SpecialFolder.MyDocuments) + "\\picture.bmp";
bitmap1 = new System.Drawing.Bitmap(imagePath, true);
pictureControl1.Image = bitmap1;
}
Dim pictureControl1 As Microsoft.Office.Tools.Word.PictureContentControl
Dim bitmap1 As System.Drawing.Bitmap
Private Sub AddPictureControlAtSelection()
If Me.Application.ActiveDocument Is Nothing Then
Return
End If
Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
vstoDoc.Paragraphs(1).Range.InsertParagraphBefore()
vstoDoc.Paragraphs(1).Range.Select()
pictureControl1 = vstoDoc.Controls.AddPictureContentControl("pictureControl1")
Dim imagePath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & _
"\picture.bmp"
bitmap1 = New System.Drawing.Bitmap(imagePath, True)
pictureControl1.Image = bitmap1
End Sub
注釈
実行時に文書内の現在の選択範囲に新しい PictureContentControl を追加するには、このメソッドを使用します。 詳細については、「 Adding Controls to Office Documents at Run Time」を参照してください。
適用対象
AddPictureContentControl(ContentControl, String)
ドキュメント内のネイティブなコンテンツ コントロールに基づいた新しい PictureContentControl を追加します。
public:
Microsoft::Office::Tools::Word::PictureContentControl ^ AddPictureContentControl(Microsoft::Office::Interop::Word::ContentControl ^ contentControl, System::String ^ name);
public Microsoft.Office.Tools.Word.PictureContentControl AddPictureContentControl (Microsoft.Office.Interop.Word.ContentControl contentControl, string name);
abstract member AddPictureContentControl : Microsoft.Office.Interop.Word.ContentControl * string -> Microsoft.Office.Tools.Word.PictureContentControl
Public Function AddPictureContentControl (contentControl As ContentControl, name As String) As PictureContentControl
パラメーター
- contentControl
- ContentControl
新しいコントロールのベースとなる ContentControl。
- name
- String
新しいコントロールの名前。
戻り値
ドキュメントに追加された PictureContentControl。
例外
contentControl
が null
.-or- name
または の null
長さが 0 です。
ControlCollection に既に同じ名前のコントロールがあります。
contentControl
は文書パーツ ギャラリーではありません (つまり、 Type の contentControl
プロパティに Microsoft.Office.Interop.Word の値がありません。WdContentControlType.wdContentControlPicture)。
例
次のコード例では、ドキュメント内のすべてのネイティブ画像コントロールに対して新しい PictureContentControl を作成します。
このバージョンは、ドキュメント レベルのカスタマイズ用です。 このコードを使用するには、プロジェクトの ThisDocument
クラスに貼り付け、 メソッドから メソッドをCreatePictureControlFromNativeControl
ThisDocument_Startup
呼び出します。
private System.Collections.Generic.List
<Microsoft.Office.Tools.Word.PictureContentControl> pictureControls;
private void CreatePictureControlFromNativeControl()
{
if (this.ContentControls.Count <= 0)
return;
pictureControls = new System.Collections.Generic.List
<Microsoft.Office.Tools.Word.PictureContentControl>();
int count = 0;
foreach (Word.ContentControl nativeControl in this.ContentControls)
{
if (nativeControl.Type == Word.WdContentControlType.wdContentControlPicture)
{
count++;
Microsoft.Office.Tools.Word.PictureContentControl tempControl =
this.Controls.AddPictureContentControl(nativeControl,
"VSTOPictureContentControl" + count.ToString());
pictureControls.Add(tempControl);
}
}
}
Private pictureControls As New System.Collections.Generic.List _
(Of Microsoft.Office.Tools.Word.PictureContentControl)
Private Sub CreatePictureControlsFromNativeControls()
If Me.ContentControls.Count <= 0 Then
Return
End If
Dim count As Integer = 0
For Each nativeControl As Word.ContentControl In Me.ContentControls
If nativeControl.Type = Word.WdContentControlType.wdContentControlPicture Then
count += 1
Dim tempControl As Microsoft.Office.Tools.Word.PictureContentControl = _
Me.Controls.AddPictureContentControl(nativeControl, _
"VSTOPictureContentControl" + count.ToString())
pictureControls.Add(tempControl)
End If
Next nativeControl
End Sub
このバージョンは、.NET Framework 4 または .NET Framework 4.5 を対象とするアプリケーション レベルのアドイン用です。 このコードを使用するには、プロジェクトの ThisAddIn
クラスに貼り付け、 メソッドから メソッドをCreatePictureControlFromNativeControl
ThisAddIn_Startup
呼び出します。
private System.Collections.Generic.List
<Microsoft.Office.Tools.Word.PictureContentControl> pictureControls;
private void CreatePictureControlFromNativeControl()
{
if (this.Application.ActiveDocument == null)
return;
Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
if (vstoDoc.ContentControls.Count <= 0)
return;
pictureControls = new System.Collections.Generic.List
<Microsoft.Office.Tools.Word.PictureContentControl>();
int count = 0;
foreach (Word.ContentControl nativeControl in vstoDoc.ContentControls)
{
if (nativeControl.Type == Word.WdContentControlType.wdContentControlPicture)
{
count++;
Microsoft.Office.Tools.Word.PictureContentControl tempControl =
vstoDoc.Controls.AddPictureContentControl(nativeControl,
"VSTOPictureContentControl" + count.ToString());
pictureControls.Add(tempControl);
}
}
}
Private pictureControls As New System.Collections.Generic.List _
(Of Microsoft.Office.Tools.Word.PictureContentControl)
Private Sub CreatePictureControlsFromNativeControls()
If Me.Application.ActiveDocument Is Nothing Then
Return
End If
Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
If vstoDoc.ContentControls.Count <= 0 Then
Return
End If
Dim count As Integer = 0
For Each nativeControl As Word.ContentControl In vstoDoc.ContentControls
If nativeControl.Type = Word.WdContentControlType.wdContentControlPicture Then
count += 1
Dim tempControl As Microsoft.Office.Tools.Word.PictureContentControl = _
vstoDoc.Controls.AddPictureContentControl(nativeControl, _
"VSTOPictureContentControl" + count.ToString())
pictureControls.Add(tempControl)
End If
Next nativeControl
End Sub
次のコード例では、ユーザーがドキュメントに追加するすべてのネイティブ画像コントロールに対して新しい PictureContentControl を作成します。
このバージョンは、ドキュメント レベルのカスタマイズ用です。 このコードを使用するには、プロジェクトの クラスに ThisDocument
貼り付けます。 C# の場合は、イベント ハンドラーを ThisDocument_PictureContentControlAfterAdd
クラスの ThisDocument
イベントにContentControlAfterAddアタッチする必要もあります。
void ThisDocument_PictureContentControlAfterAdd(Word.ContentControl NewContentControl, bool InUndoRedo)
{
if (NewContentControl.Type == Word.WdContentControlType.wdContentControlPicture)
{
this.Controls.AddPictureContentControl(NewContentControl,
"PictureControl" + NewContentControl.ID);
}
}
Private Sub ThisDocument_PictureContentControlAfterAdd(ByVal NewContentControl As Word.ContentControl, _
ByVal InUndoRedo As Boolean) Handles Me.ContentControlAfterAdd
If NewContentControl.Type = Word.WdContentControlType.wdContentControlPicture Then
Me.Controls.AddPictureContentControl(NewContentControl, _
"PictureControl" + NewContentControl.ID)
End If
End Sub
このバージョンは、.NET Framework 4 または .NET Framework 4.5 を対象とするアプリケーション レベルのアドイン用です。 このコードを使用するには、プロジェクトの クラスに ThisAddIn
貼り付けます。 また、作業中の文書の ActiveDocument_PictureContentControlAfterAdd
イベントにイベント ハンドラーを ContentControlAfterAdd アタッチする必要があります。
void ActiveDocument_PictureContentControlAfterAdd(
Word.ContentControl NewContentControl, bool InUndoRedo)
{
Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
if (NewContentControl.Type == Word.WdContentControlType.wdContentControlPicture)
{
vstoDoc.Controls.AddPictureContentControl(NewContentControl,
"PictureControl" + NewContentControl.ID);
}
}
Private Sub ActiveDocument_PictureContentControlAfterAdd( _
ByVal NewContentControl As Word.ContentControl, _
ByVal InUndoRedo As Boolean)
Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
If NewContentControl.Type = Word.WdContentControlType. _
wdContentControlPicture Then
vstoDoc.Controls.AddPictureContentControl(NewContentControl, _
"PictureControl" + NewContentControl.ID)
End If
End Sub
注釈
実行時にドキュメント内のネイティブ コンテンツ コントロールに基づく新しい PictureContentControl を追加するには、このメソッドを使用します。 これは、実行時に を PictureContentControl 作成し、次にドキュメントを開いたときに同じコントロールを再作成する場合に便利です。 詳細については、「 Adding Controls to Office Documents at Run Time」を参照してください。