Как скопировать данные из Excel в слово и сохранить их форматирование - PullRequest
1 голос
/ 28 сентября 2010

Я пытался скопировать текст из excel в слово и сохранить жирный формат текста, но не ячейку.Когда я пытаюсь вручную скопировать и вставить ячейку, текст копируется, но не сама ячейка.Когда я пытаюсь повторить это, используя vb (как показано ниже), ячейка также копируется по

With wrdDoc

    .Content.Font.Name = "Times New Roman"
    .Content.Font.Size = 11
    .Content.InsertParagraphAfter
    .Content.InsertParagraphAfter
    With Worksheets("Sheet1")
        Cells(1, 1).Select
        Cells(1, 1).Copy
    End With
    .Content.InsertAfter "AddTableHere"
    .Content.Find.Execute FindText:="AddTableHere", ReplaceWith:="^c"


End With

Кто-нибудь есть какие-либо предложения о том, как я мог бы сделать это?

Спасибо

1 Ответ

1 голос
/ 29 сентября 2010

Объект Selection в Word имеет метод PasteExcelTable, который может соответствовать всем требованиям - подробности см. MSDN

...