文档章节

word删除最后一个表格的行

china008
 china008
发布于 2014/06/14 09:32
字数 184
阅读 12
收藏 0
点赞 0
评论 0
  'Option Base 1
Sub aa()
  Dim s As String
  Dim t As String
  Dim p As String
  Dim path As String
 
  '定义删除的行号
  Dim drow(1 To 3)
 drow(1) = 1
 drow(2) = 2
 drow(3) = 3
 
  'MsgBox UBound(drow) - LBound(drow)
 
 
  p = ThisDocument.path
  s = p & "\s\"
  t = p & "\t\"
 
  path = Dir(s)
 

 While path <> ""
 
    'MsgBox path
    'delete 行
    Call deleterow(s, t, path, drow)
    path = Dir()

  Wend


 
 
 
End Sub

Function deleterow(s As String, t As String, path As String, drow As Variant)
Dim line As Integer
Dim row As Integer
Dim total As Integer
Dim doc As Document
Dim tdoc As Document
Dim spath As String
Dim tpath As String
spath = s & path
tpath = t & path


Set doc = Documents.Open(spath)
doc.SaveAs2 (tpath)
total = doc.Tables.Count
doc.Close (wdDoNotSaveChanges)

Set tdoc = Documents.Open(tpath)
tdoc.Unprotect "111111"
total = tdoc.Tables.Count

For Each x In drow
   'MsgBox x
   tdoc.Tables(total).Rows(1).Delete
  Next
tdoc.Protect wdAllowOnlyFormFields, True, "111111"

tdoc.Close (wdSaveChanges)





End Function

© 著作权归作者所有

共有 人打赏支持
china008
粉丝 5
博文 182
码字总数 30406
作品 0
海淀
word分节符与分页符的区别与用法

word分节符与分页符的区别与用法 分页符 当文字或图形填满一页时,Microsoft Word 会插入一个自动分页符 (分页符:上一页结束以及下一页开始的位置。Microsoft Word 可插入一个“自动”分页...

52PiggySky ⋅ 2014/02/26 ⋅ 0

Aspose.Words对Word的操作

对于word操作一般是对已有word模板的操作,直接新建的不考虑,网上教程很多,自己看吧一般有以下几种办法(忘了具体几种了,一般情况下以下就够了)1、通过书签替换顾名思义,就是先定义一个...

wen1512 ⋅ 2016/09/20 ⋅ 0

vim命令总结

vim 共分为三种模式,分别是『一般模式』、『编辑模式』与『指令列命令模式』。 表格是对vim常用命令的总结: 第二部份:一般模式切换到编辑模式的可用的按钮说明 第三部份:一般模式切换到指...

喵来个鱼 ⋅ 2017/12/10 ⋅ 0

vi和vim编辑器的使用

常用命令 O 开启新的一行 0 跳到本行的头部 b, B 以单词为单位往前跳动光标,小写包含标点 w, e, W, E 跳到单词的后面,小写包括标点 h,j,k,l h表示往左,j表示往下,k表示往上,l表示往右 ...

李矮矮 ⋅ 2016/11/24 ⋅ 0

vim命令笔记

一般模式:移动光标 #移动到非空格的上一行 一般模式:搜索与替换 一般模式:删除、复制与粘贴 撤销和回复 进入编辑模式 退回一般模式 命令行命令模式 块选择 多文件编辑 多窗口功能 vim环境...

红星闪闪 ⋅ 2013/03/29 ⋅ 0

ubuntu vim终端编辑命令

一. VIM高亮 进入vim后,在普通模式下输入如下命令,开启php代码高亮显示   :syntax enable   :source $VIMRUNTIME/syntax/php.vim 二. VI常用命令 _ 一般模式 光标移动 h 或 向左方向键...

Koon.LY ⋅ 2012/06/25 ⋅ 0

linux学习5 vi,vim的学习

1、一般模式 移动 h或方向左 ------------------- 左移动 j或方向下-------------------- 下移动 k或方向上------------------ 上移动 l或方向右 ------------------- 右移动 crtl+f 向下移动...

SunnyWu ⋅ 2014/11/04 ⋅ 0

Vim的简单用法

Vi是一种常见的文本编辑器 Vim 是Vi iMproved ,是vi文本编辑器的加强 Vi分为3个模式,分别为一般模式,编辑模式与命令行模式。 一般模式 直接用vi命令打开一个文件,就进入了一般模式(默认...

Billy112487983 ⋅ 2014/04/25 ⋅ 0

Linux vi编辑器的使用以及一些快捷命令

vi编辑器可以执行输出,删除,查找,替换等文本操作。vi以命令行的方式处理文本。打开vi它占据整个屏幕。 vi命令的选项及其意义 -c command 在对文件进行编辑前,先执行command命令 -r filen...

heizhou ⋅ 2017/08/19 ⋅ 0

使用POI读写word doc文件

Apache poi的hwpf模块是专门用来对word doc文件进行读写操作的。在hwpf里面我们使用HWPFDocument来表示一个word doc文档。在HWPFDocument里面有这么几个概念: l Range:它表示一个范围,这个...

Mr_Damen ⋅ 2016/10/19 ⋅ 0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

大数据工程师需要精通算法吗,要达到一个什么程度呢?

机器学习是人工智能的一个重要分支,而机器学习下最重要的就是算法,本文讲述归纳了入门级的几个机器学习算法,加大数据学习群:716581014一起加入AI技术大本营。 1、监督学习算法 这个算法由...

董黎明 ⋅ 42分钟前 ⋅ 0

Kylin 对维度表的的要求

1.要具有数据一致性,主键值必须是唯一的;Kylin 会进行检查,如果有两行的主键值相同则会报错。 2.维度表越小越好,因为 Kylin 会将维度表加载到内存中供查询;过大的表不适合作为维度表,默...

无精疯 ⋅ 46分钟前 ⋅ 0

58到家数据库30条军规解读

军规适用场景:并发量大、数据量大的互联网业务 军规:介绍内容 解读:讲解原因,解读比军规更重要 一、基础规范 (1)必须使用InnoDB存储引擎 解读:支持事务、行级锁、并发性能更好、CPU及...

kim_o ⋅ 49分钟前 ⋅ 0

代码注释中顺序更改 文件读写换行

`package ssh; import com.xxx.common.log.LogFactory; import com.xxx.common.log.LoggerUtil; import org.apache.commons.lang3.StringUtils; import java.io.*; public class DirErgodic ......

林伟琨 ⋅ 57分钟前 ⋅ 0

linux实用操作命令

参考 http://blog.csdn.net/qwe6112071/article/details/50806734 ls [选项] [目录名 | 列出相关目录下的所有目录和文件 -a 列出包括.a开头的隐藏文件的所有文件-A 同-a,但不列出"."和"...

简心 ⋅ 今天 ⋅ 0

preg_match处理中文符号 url编码方法

之前想过直接用符号来替换,但失败了,或者用其他方式,但有有些复杂,这个是一个新的思路,亲测可用 <?php$str='637朗逸·超速新风王(300)(白光)'; $str=iconv("UTF-8","GBK",$s...

大灰狼wow ⋅ 今天 ⋅ 0

DevOps 资讯 | PostgreSQL 的时代到来了吗 ?

PostgreSQL是对象-关系型数据库,BSD 许可证。拼读为"post-gress-Q-L"。 作者: Tony Baer 原文: Has the time finally come for PostgreSQL?(有删节) 近30年来 PostgreSQL 无疑是您从未听...

RiboseYim ⋅ 今天 ⋅ 0

github太慢

1:用浏览器访问 IPAddress.com or http://tool.chinaz.com 使用 IP Lookup 工具获得github.com和github.global.ssl.fastly.net域名的ip地址 2:/etc/hosts文件中添加如下格式(IP最好自己查一...

whoisliang ⋅ 今天 ⋅ 0

非阻塞同步之 CAS

为解决线程安全问题,互斥同步相当于以时间换空间。多线程情况下,只有一个线程可以访问同步代码。这种同步也叫阻塞同步(Blocking Synchronization). 这种同步属于一种悲观并发策略。认为只...

长安一梦 ⋅ 今天 ⋅ 0

云计算的选择悖论如何对待?

人们都希望在工作和生活中有所选择。但心理学家的调查研究表明,在多种选项中进行选择并不一定会使人们更快乐,甚至不会产生更好的决策。心理学家Barry Schwartz称之为“选择悖论”。云计算为...

linux-tao ⋅ 今天 ⋅ 0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部