2016-10-12 6 views
1

Wordの表のセル(書式付きテキスト、箇条書き、表、イメージ)の内容をコピーして出力docxファイルに貼り付けようとしています。残念ながら、以下のコードはセル全体をコピーするので、出力ファイルに望ましくないテーブルが作成されます。Word VBAテーブル - 書式付きセルの内容をコピーしますが、テーブルはコピーしません。

With outputApp.Selection 
    dbDoc.Tables(1).Cell(tableRow, 3).Range.Copy 
    .Paste 
End With 

答えて

0

出力ドキュメント内のテーブルを、書式設定されたコンテンツに変換し、ネストしたテーブルを保持するための回避策が見つかりました。その後、メインテーブルを取り除いた後でもう必要ないので、コンテンツのインデントとそれ以前にネストされたテーブルを削除します。

よりクリーンで効率的なソリューションを探しています。

For Each table In outputDoc.Tables   
    table.ConvertToText Separator:=wdSeparateByParagraphs, NestedTables:=False 
Next table 

With outputDoc.Content.ParagraphFormat 
    .LeftIndent = CentimetersToPoints(0) 
    .FirstLineIndent = CentimetersToPoints(0) 
End With 

For Each table In outputDoc.Tables 
    table.Rows.LeftIndent = CentimetersToPoints(0) 
Next table 
関連する問題