在vb.net應用行動態添加到單詞表

Question

我這段代碼運行在vb.net中打開一個word文檔

Dim oWord_detail As New word.Application 
Dim oDoc_detail As word.Document 
oWord_detail.Visible = True 
oDoc_detail = oWord_detail.Documents.Open("c:\integra-billing\integra-invoice-detail.docx", False, False) 

我使用此行到一個新行添加到我的word文檔

oDoc_detail.Tables(1).Rows.Add() 

但它運行的時候，上面的線顯示了錯誤：

The requested member of the collection does not exist 

Answer 1

如果表中已經存在嘗試 oDoc_detail.Tables.Item（1）.Rows.Add（）

然後爲文字添加到細胞

Dim oWord_detail As New Word.Application 
Dim oDoc_detail As Word.Document 
oWord_detail.Visible = True 
oDoc_detail = oWord_detail.Documents.Open("C:\Dati\Temp\test.docx", False, False) 
oDoc_detail.Tables.Item(1).Rows.Add() 

For r = 1 To 1 'your row 
For c = 1 To 3 
oDoc_detail.Tables.Item(1).Cell(r, c).Range.Text = "r" & r & "c" & c 
Next 
Next