Rows.Add メソッド (Word)

  • [アーティクル]

表に追加された行を表す Row オブジェクトを返します。

構文

式。Add ( _BeforeRow_ )

expression 必須です。 Rows オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
BeforeRow 省略可能 バリアント型 新しく追加するセルのすぐ下の行を表す Row オブジェクトを指定します。

戻り値

行

例

次の使用例は、選択範囲内の先頭行の前に新しい行を挿入します。

Sub AddARow() 
 If Selection.Information(wdWithInTable) = True Then 
 Selection.Rows.Add BeforeRow:=Selection.Rows(1) 
 End If 
End Sub

次の使用例は、最初の表に列を追加し、その列に文字列 Cell を挿入します。

Sub CountCells() 
 Dim tblNew As Table 
 Dim rowNew As Row 
 Dim celTable As Cell 
 Dim intCount As Integer 
 
 intCount = 1 
 Set tblNew = ActiveDocument.Tables(1) 
 Set rowNew = tblNew.Rows.Add(BeforeRow:=tblNew.Rows(1)) 
 For Each celTable In rowNew.Cells 
 celTable.Range.InsertAfter Text:="Cell " & intCount 
 intCount = intCount + 1 
 Next celTable 
End Sub

関連項目

Rows コレクション オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。