惯性聚合 高效追踪和阅读你感兴趣的博客、新闻、科技资讯
阅读原文 在惯性聚合中打开

推荐订阅源

月光博客
月光博客
Martin Fowler
Martin Fowler
cs.CL updates on arXiv.org
cs.CL updates on arXiv.org
Stack Overflow Blog
Stack Overflow Blog
C
Check Point Blog
阮一峰的网络日志
阮一峰的网络日志
奇客Solidot–传递最新科技情报
奇客Solidot–传递最新科技情报
B
Blog
O
OpenAI News
云风的 BLOG
云风的 BLOG
Threat Intelligence Blog | Flashpoint
Threat Intelligence Blog | Flashpoint
L
LangChain Blog
V
Vulnerabilities – Threatpost
P
Privacy & Cybersecurity Law Blog
Microsoft Azure Blog
Microsoft Azure Blog
H
Help Net Security
博客园 - 三生石上(FineUI控件)
C
Cyber Attacks, Cyber Crime and Cyber Security
N
News | PayPal Newsroom
The Register - Security
The Register - Security
Cyber Security Advisories - MS-ISAC
Cyber Security Advisories - MS-ISAC
T
Threat Research - Cisco Blogs
C
Cisco Blogs
www.infosecurity-magazine.com
www.infosecurity-magazine.com
Vercel News
Vercel News
宝玉的分享
宝玉的分享
T
Tailwind CSS Blog
H
Hackread – Cybersecurity News, Data Breaches, AI and More
Attack and Defense Labs
Attack and Defense Labs
人人都是产品经理
人人都是产品经理
S
Security Affairs
爱范儿
爱范儿
Engineering at Meta
Engineering at Meta
T
Tor Project blog
大猫的无限游戏
大猫的无限游戏
L
Lohrmann on Cybersecurity
aimingoo的专栏
aimingoo的专栏
K
KPMG report finds enterprise disconnect between AI and its ROI | CIO
博客园 - 【当耐特】
V
V2EX
V
Visual Studio Blog
The GitHub Blog
The GitHub Blog
雷峰网
雷峰网
WordPress大学
WordPress大学
Exploit-DB.com RSS Feed
Exploit-DB.com RSS Feed
L
LINUX DO - 最新话题
让小产品的独立变现更简单 - ezindie.com
让小产品的独立变现更简单 - ezindie.com
Schneier on Security
Schneier on Security
小众软件
小众软件
PCI Perspectives
PCI Perspectives

博客园 - yunbo

转:VB.NET Office操作之Word 如何在VB.net中建立word文档 转发:VB程序操作word表格(文字、图片) [转载]国外期刊投稿、审稿过程以及常用术语 在vs2012中使用TeeChart空间 vb的一些常用算法代码 ansys划分网格后,改变单元材料属性的方法 .net2003出现无法启动调试 没有正确安装调试器 - yunbo - 博客园 [转] 朋友看看吧,加强警惕性 win7 下安装 adams VB.net对UG进行二次开发及实例 不可以不学的保命驾驶技巧(转) 转载--国外博士后申请 申请国外博士后的三个途径 VBA自定义菜单和菜单栏 VBA控制菜单栏上的菜单(如页面设置、打印) - yunbo - 博客园 VAB删除Word多余空行 三亚自由人攻略.2009最新 电脑开机自检很慢,如何解决?
VB.net中合并word中的表格
yunbo · 2018-05-12 · via 博客园 - yunbo

软帝国产品的互兼容性使得我们采用vb.net编程语言操作Microsoft Word文档变得相当容易。针对本文的主题,网络上已经有很多大牛博客做了详细的介绍,基本的我就不再赘述,只是自己在做项目的时候需要用到合并单元格的操作,一时难以在网上找到准确的答案,如今终于琢磨出来,遂决定跟大家分享一下我的经验,免得后来者再走弯路。

1、创建表格:

1 Imports MSWord = Microsoft.Office.Interop.Word  
2 Dim table1 As MSWord.Table = wordDoc.Tables.Add(wordDoc.Paragraphs.Last.Range, 7, 4, Missing.Value)  

2、合并单元格:

1 table.Cell(2, 1).Select()'选中第一个单元格  
2 wordDoc.Application.Selection.MoveDown(5, 5, 1)'移动到第六行,中间的5代表移动的行数  
3 wordDoc.Application.Selection.Cells.Merge()'执行合并操作  
4 wordDoc.Application.Selection.Range.Text = "合并"'合并后的单元格赋值  

以上代码的意思就是,选中表格的第一列中从第二行到第6行的单元格,将其合并,并将合并后的单元格的内容赋值为:“合并”。

 3、添加图片:

wordDoc.InlineShapes.AddPicture(Application.StartupPath + "\_gan_" + i1.ToString + ".Png", False, True, wordDoc.Paragraphs.Last.Range)