將單元格值從excel復制並粘貼到word，而無需更改格式

Question

我正在嘗試將大合並的單元格“復制並粘貼”到Microsoft Word文件中。 除了格式完全不同（全黑，無粗體...）外，它工作正常。 有沒有辦法可以保持相同的格式？ 這是我的代碼：

Sub OpenMWord()

Dim oWApp As Object
Dim oWDoc As Object
Dim sText As String
Dim iCntr As Long
'
Set oWApp = New Word.Application
Set oWDoc = oWApp.Documents.Add() '("C:\Documents\Doc1.dot") 'You can     specify your template here
'
'Adding new Paragraph
'
Dim para As Paragraph
Set para = oWDoc.Paragraphs.Add
'
para.Range.text = textWORD

'
oWDoc.Paragraphs.Add

'
oWApp.Visible = True


End Sub

謝謝

Answer 1

從Excel復制單元格后，嘗試使用

Selection.PasteExcelTable False, False, False

PasteExcelTable的參數為：
LinkedToExcel-您要假（還是對？）
WordFormatting-您要假
RTF -RTF格式，您要為假。