三九宝宝网宝宝百科宝宝知识

如何用vba代码向word文档中插入表格

12月25日 编辑 39baobao.com

[库存进库出库每天都有进出库我想问问高手怎么样做这个表格]首先第一表为库存表:项目有-名称,入库,出库,库存量 第二表为入库表:项目有-日期,名称,数量,合计 第三表为出库表:项目有-日期,名称,数量,合计 之后,在库存表中的名称列录入你的所有商品名...+阅读

试试下面的代码,在网上找的

sub 宏1()

dim wordapp as object

dim mydoc

dim mypath$, myname$

dim wdrng as object

dim pos1%, pos2% '定义找到的字段的首位位置

application.displayalerts = false

set wordapp = createobject("word.application")

mypath = thisworkbook.path & ""

myname = dir(mypath & "*.doc*")

set mydoc = wordapp.documents.open(mypath & myname)

set wdrng = mydoc.range

wdrng.find.execute ("(一)")

pos1 = wdrng.start

set wdrng = mydoc.range

wdrng.find.execute ("五、")

pos2 = wdrng.start

mydoc.range(pos1, pos2).copy '选中找到的两个字段中间的内容

mydoc.close false

wordapp.quit

worksheets("sheet2").select

range("a1").select

activesheet.paste

application.screenupdating = true

application.displayalerts = true

end sub

以下为关联文档:

EXCEL仓库出入库表格全做参考,你看看 搜索:北京富通维尔科技有限公司网站,里面有很多版本可以下载,包括。仓库公司版关注的是库内管理,比如货位管理、先进先出等;进销存公司版关注的是采购成本和销售...

求excel出入库表格带公式的仅仅通过公式,是实现不了仓库管理的,要通过VBA,而且要用到sql功能。 我给你发了一个,你可以参考一下。 功能扩展性很强,先看看介绍: Excel物资管理系统,实现入出库管理、库存管理、...

两个EXCEL表格数据合并问题精通Vlookup的来楼上的方法不能处理同名学生的情况,下面我介绍我的办法。 根据你的情况,同一学校里同名学生的概率还是很大的,所以合并时,不但要对比姓名,还要对比班级,也就是把班级和姓名都相同...

在WORD中页码放在页脚中插入自动图文集在WORD中页码放在页脚中,插入自动图文集步骤: 1.点视图里的页眉页脚 2.可以看到上面会有个 自动图文集 3.在自动图文集选一种,你想要的页码的形式就好...

航海类应届毕业生个人简历表格范文word求职简历模板 发到你QQ邮箱了,希望能够帮的上你 更多简历模板参考: -----范文---------- 航海技术专业个人简历模板 教育背景 毕业院校:**大学**系航海技术专业 所学课程:交...

如何使用wps表格自动计算功能1、首先我们使用wps office2019打开一个表格,然后点击左上角的文件图标 2、在文件列表中,我们找到工具,点击打开 3、在工具的下拉列表中,我们找到选项,点击打开 4、在wps offi...

在WPS表格里怎么计算啊付费内容限时免费查看 回答 您好!已收到您的问题了,正在帮您整理答案,请稍等一会哦 打开WPS表格,输入折扣。 2 /7 复制原来的价格所在的表格区域。 3 /7 粘贴在折扣后金额的表格...

VBA如何在WORD中实现移动表格使用VBA操作Word表格 一、生成表格 Private Sub CreateTable(mRows As Integer, mColumns) Dim mRange As Range Set mRange = ActiveDocument.Range mRange.SetRange Start...

VBA用excel模块复制word的表格内容试试下面的代码: Sub 宏1() Dim wordapp As Object Dim mydoc Dim mypath$, myname$ Dim wdRng As Object Dim pos1%, pos2% '定义找到的字段的首位位置 Application.Display...

推荐阅读
图文推荐