Word VBA中读取Excel表格中的数据

前天有一个项目需要写详细设计报告，其中有一块重要内容是把Excel中的每一行数据做成一个Word中的表格。一共将近100行数据，如果我一行一行地手动去做，估计手就废了，于是采用Word VBA。

基本编程思路

创建一个空word文档
word文档中，编辑好一个示例表格，作为一个母表，后续所有的表格程序都是复制这张表，然后修改复制后的新表格的数据
打开Excel，遍历每一行数据
取这一行关键数据，复制母表，改变复制后的表格数据

代码片段

Dim wb As Document
Set doc = Application.ActiveDocumentSet xlapp = CreateObject("excel.application")
Set wkBook = xlapp.Workbooks.Open("C:\Users\shenh\Desktop\VBA处理Excel表格\几何拓扑检查项.xlsx")For rowNum = 1 To 63CheckName = wkBook.Worksheets(1).Cells(rowNum, 3)meaning = wkBook.Worksheets(1).Cells(rowNum, 4)CheckName = CheckName & "项"paraCount = doc.Paragraphs.Countdoc.Paragraphs(paraCount).Range.Text = CheckName & vbCrLf            '写标题paraCount = doc.Paragraphs.Countdoc.Paragraphs(paraCount).Range.Text = CheckName & "详细定义见表" & rowNum + 75 & "所示" & vbCrLf         '写标题paraCount = doc.Paragraphs.Countdoc.Paragraphs(paraCount).Range.Text = "表 " & rowNum + 75 & " " & CheckName & "定义表" & vbCrLfdoc.Tables(1).Range.CopySet endRange = ActiveDocument.ContentendRange.Collapse Direction:=wdCollapseEndendRange.Pastedoc.Tables(rowNum + 1).Cell(1, 3).Range.Text = CheckNamedoc.Tables(rowNum + 1).Cell(1, 3).Range.Text = meaningNext
MsgBox wkBook.Sheets(1).Cells(1, 5)
wkBook.Close
xlapp.Quit

Word VBA中读取Excel表格中的数据相关推荐

java中读取Excel表格中的数据
2019独角兽企业重金招聘Python工程师标准>>> 有关java中读取有上传的Excel文件,上传的Excel文件后缀可分为xls,xlsx 1:.xls后缀的文件在获取Work ...
如何读取Excel表格中不同sheet表的同一位置单元格数据，并绘制条形图呢？
作者 | 黄伟呢来源 | 数据分析与统计学之美今天,有位朋友在群里面咨询了一个问题:如何读取Excel表格中"不同sheet表"的同一位置单元格数据,并绘制条形图呢? 有人提议 ...
python读取excel表格-python读取excel表格中的数据
使用python语言实现Excel 表格中的数据读取,需要用到xlrd.py模块,实现程序如下: import xlrd #导入xlrd模块 class ExcelData(): def __init ...
python3读取excel数据-python3 读取Excel表格中的数据
需要先安装openpyxl库通过pip命令安装: pip install openpyxl 源码如下: #!/usr/bin/python3 #-*- coding:utf-8 -*- import ...
Matlab中读取excel表格数据
一:Matlab中读取excel表格数据步骤讲解: 第二步: 第三步: 第四步: 第五步: 第六步第七步: 输入之后按回车键,就会出现相应的波形: 效果图:
java实现读取excel表格中的数据，兼容xls和xlsx
前言利用 java 实现读取 excel 表格中的数据,兼容 xls 与 xlsx 格式,不用额外做区分,写不同的实现方法. 引入的依赖包 <dependency><groupId ...
java搜索excel表格里的数据_Java读取Excel表格中的数据
前言本文主要讲述如何在Java中读取Excel表中的数据并在控制台输出,实现工具为Eclipse 提示:以下是本篇文章正文内容,下面案例可供参考一.添加jar包文件描述:在Java中导入导出Ex ...
Java读取Excel表格中的数据
文章目录前言一.添加jar包文件 1.在Eclipse工程下新建lib文件夹 2.复制jar包 3.将jar包粘贴到Eclipse中 4.配置构建路径二.案例代码 1.新建类 2.获取Excel ...
使用POI读取Excel表格中数据
使用POI读取Excel表格中数据已经在使用POI读取Excel表格中数据2优化.(https://blog.csdn.net/qq_36570464/article/details/107053 ...
java excel 中文乱码_java中读取excel文件中字符串乱码问题解决方法
以前的时候发现直接java读取一个excel文件输出里面的字符串会乱码,中文字符不会乱码,但是遇到英文的时候输出会乱码.这个问题太奇怪了. 我的表格名字为Shirley.xls. 我曾经直接读取exc ...

Word VBA中读取Excel表格中的数据

Word VBA中读取Excel表格中的数据

基本编程思路

代码片段

Word VBA中读取Excel表格中的数据相关推荐

最新文章

热门文章