首页 > 其他分享 >利用 word VBA 将投标文件偏离参数表列数据拷贝至技术偏差表中

利用 word VBA 将投标文件偏离参数表列数据拷贝至技术偏差表中

时间:2024-06-03 16:54:39浏览次数:23  
标签:Tables VBA word Sub 参数表 Cell Range ActiveDocument

使用 vba 将正偏离参数表的第一列信息复制粘贴至对应的技术偏离表的第4列中。需要同时打开两个 word 文件,在技术偏差表中打开 VBE(可以用ctrl + f11 快捷键),插入模块。

忽略格式的方式,

Sub CopyDataToTable()

  Windows("正偏离参数表.docx").Activate
  
  For i = 1 To ActiveDocument.Tables(1).Rows.Count
    a = ActiveDocument.Tables(1).Cell(i, 1).Range.Text
    Windows("技术偏差表.docx").Selection.Tables(1).Cell(i + 1, 4).Range = Replace(a, vbCr, "")
  Next
  Rem Debug.Print ActiveDocument.Tables(1).Cell(2, 4).Range.Text

End Sub

考虑文本格式的方式

Sub CopyAndPasteDataToTable2()
  Windows("正偏离参数表.docx").Activate
  For i = 1 To ActiveDocument.Tables(1).Rows.Count Step 1
    On Error Resume Next
    ActiveDocument.Tables(1).Cell(i, 1).Range.Copy
    Windows("技术偏差表.docx").Selection.Tables(1).Cell(i + 1, 4).Range.Paste
  Next
End Sub

以上是针对 word中一个表格的情况。遍历行,依次写入或复制粘贴相应数据至对应表行。

标签:Tables,VBA,word,Sub,参数表,Cell,Range,ActiveDocument
From: https://www.cnblogs.com/geyee/p/18229225

相关文章

  • Python 将Word/ Exce/ PDF/ PPT文档转为OFD文档
    OFD(OpenFixed-layoutDocument)是我国自主制定的一种开放版式文件格式标准。OFD文档具有不易被篡改、格式独立、版式固定等特点,目前常用于政府公文、金融、电子发票等领域。如果想要通过Python将Office文档(如Word、Excel或PowerPoint)及PDF文档转换为OFD格式,可以参考本文中提供的......
  • LeetCode 720. Longest Word in Dictionary
    原题链接在这里:https://leetcode.com/problems/longest-word-in-dictionary/description/题目:Givenanarrayofstrings words representinganEnglishDictionary,return thelongestwordin words thatcanbebuiltonecharacteratatimebyotherwordsin wor......
  • wordpress搭建博客
    前排提醒由于本人的服务器只有1G内存,但是mysql启动就占用500M,系统占用500M,导致wordpress计划流产。Abstract本文将记录本人使用wordpress搭建博客的流程。0.Requirements系统:Ubuntu22.04根据wordpress官网指引,需要如下软件支持:PHPversion7.4orgreater.MySQLversio......
  • 使用Qt对word文档进行读写
    目录开发环境原理使用的QT库搭建开发环境准备word模板测试用例结果Gitee地址开发环境vs2022+Qt5.9.1+msvc2017_x64,在文章最后提供了源码。原理Qt对于word文档的操作都是在书签位置进行插入文本、图片或表格的操作。使用的QT库除了基本的gui、core、widget库......
  • pdf转word/text后换行问题
    pdf转word/text后换行问题pdf转为word/text,或者从pdf复制一段文字,这段文字有很多换行(其实就相当于一行一段):野史里说,楚汉争霸时期,高祖刘邦大败。薄氏还是个姑娘的时候叫薄姬,逃难的时候占领了一个无人居住的民宅。忽然有一天看见一个浑身是血,穿着盔甲拿着兵器的男人闯进了自......
  • 宝塔搭建wordexpress及WP搬家教程
     一、安装宝塔 yuminstall-ywget&&wget-Oinstall.shhttps://download.bt.cn/install/install_6.0.sh&&shinstall.shed8484bec 面板安装成功后,通过bt命令修改面板安全入口、用户名、密码。 云主机放行面板端口 登录bt面板,极速安装LNMP   ......
  • 格式刷不能跨工作薄使用,VBA自建公式快速获取 单元格背景色RGB值
    查看视频效果请点击文章目录前言1.数字转字母代码:2.获取单元格背景颜色RGB值代码:前言格式刷在我们调整Excel工作表、Word文档的格式时经常使用到,它可以帮助我们快速批量调整字体、大小、颜色、背景色等,甚至是表格行高列宽、字间距大小等。但如果在不同的......
  • sensitive-word 敏感词 v0.16.1 新特性支持字典内存资源释放
    敏感词系列sensitive-word-admin敏感词控台v1.2.0版本开源sensitive-word-adminv1.3.0发布如何支持分布式部署?01-开源敏感词工具入门使用02-如何实现一个敏感词工具?违禁词实现思路梳理03-敏感词之StopWord停止词优化与特殊符号04-敏感词之字典瘦身05-敏感词之DFA......
  • Word文档自动化
    准备链接:https://pan.baidu.com/s/1M-5JV5zgzAojXsYNYbkg2g?pwd=5qqg提取码:5qqg文件内容展示2023年日历表打印版本.docx2023年学习计划.xlsx要求将2023年学习计划.xlsx中的内容添加到2023年日历表打印版本.docx对应的日期表格中。代码#bywyw-starfromdocx......
  • 系统安全设计规范(Word原件@附软件所有资料)
    1.1安全建设原则1.2安全管理体系1.3安全管理规范1.4数据安全保障措施1.4.1数据库安全保障1.4.2操作系统安全保障1.4.3病毒防治1.5安全保障措施1.5.1实名认证保障1.5.2接口安全保障1.5.3加密传输保障1.5.4终端安全保障软件资料清单列表部分文......