我试图将Excel 2003(或2007)电子表格中的单元格一次一个地复制到Word 2003(或2007)表格中。我希望代码是版本不可知的,所以我使用后期绑定。需要保留Excel单元格内容的格式,如颜色,下划线,穿透。我的方法是使用Word文档作为模板。它在顶部有一个表格,我可以将其复制到文档的末尾,根据需要添加行,并使用Excel电子表格中的数据填写单词表格单元格。不幸的是,所有的格式都消失了。我得到的只是文本本身。如何使用.NET将Excel中格式化的单元格复制到Word表格单元格中?
0
A
回答
1
想通了。结果比预期的更容易。
Dim appExcel As Excel.Application
Dim thisWorkbook As Excel.Workbook
Dim thisWorksheet As Excel.Worksheet
appExcel = CType(CreateObject("Excel.Application"), Excel.Application)
thisWorkbook = appExcel.Workbooks.Open("Excelfilename.xls")
thisWorksheet = CType(thisWorkbook.ActiveSheet, Excel.Worksheet)
Dim appWord As Word.Application
Dim thisDoc As Word.Document
Dim thisWordTable As Word.Table
' Use a template word doc that has a table in it.
appWord = CType(CreateObject("Word.Application"), Word.Application)
thisDoc = appWord.Documents.OpenNoRepairDialog("templateWordFileName.doc")
thisDoc.SaveAs("outputDocFileName.doc")
' Get a reference to the table.
thisWordTable = thisDoc.Tables(0)
' Copy data from excel to this table.
CType(thisWorksheet.Cells(5, 1), Excel.Range).Copy()
thisWordTable.Cell(1, 2).Select()
appWord.Selection.Paste()
thisDoc.Save()
thisDoc.Close()
appWord.Quit()
thisWorkbook.Close(False) ' Don't save any changes to workbook.
appExcel.Quit()
0
您可能必须首先执行文本,然后手动复制样式。您可以使用Workbook.Styles获取Microsoft.Office.Interop.Excel.Style的集合,然后应该能够使用该数据创建Microsoft.Office.Interop.Word.Styles。
相关问题
- 1. Excel复制单元格A到单元格C如果单元格B复制
- 2. Excel格式化单元格
- 3. 当从Excel复制单元格到Word时,如何保持单元格的格式化
- 4. 如何使用jQuery以excel样式复制表格单元格?
- 5. 格式化Excel中的单元格
- 6. VB:将Excel单元复制到Word并保留Excel格式
- 7. Vlookup在Excel中格式化单元格
- 8. 将单元格1中的单元格区域复制到不同单元格中的单元格4
- 9. 如何在Excel单元格表达式中格式化货币?
- 10. 如何从单元格中的单元格填充另一个单元格中的单元格使用excel
- 11. 如何将一个单元格格式复制到该单元格旁边的所有单元格?
- 12. java将Excel单元格内容复制到word文档中
- 13. Microsoft Excel将单元格复制到Word中
- 14. 将单元格从一个表格复制到多个表格中Excel - VBA
- 15. 如何使用Excel宏模块格式化Excel电子表格单元格?
- 16. 将excel单元格数据复制到列中最近的填充单元格
- 17. Excel单元格格式
- 18. Excel格式化单元格条件
- 19. 格式化Excel单元格(货币)
- 20. 将单元格从一个单元格复制到另一个单元格
- 21. excel中的VBA格式单元格
- 22. 如何将excel中的公式复制并粘贴到与初始单元格不相邻的单元格中?
- 23. 将单元格的值复制到同一行的单元格
- 24. 使用循环将单元格的值复制到多个单元格中
- 25. 在Word表单元格内格式化特定单词
- 26. apps-script:将电子表格单元格复制到表格,格式为
- 27. Excel复制并粘贴合并单元格为单元格格式
- 28. 从Google表格中的表中条件格式化单元格
- 29. 将单元格中的数据复制到新工作表的单元格
- 30. 在单元格内的公式中使用单元格名称时单元格的条件格式化