[求助]如何取得当前的页数

zxyding · 发表于 2003-1-9 08:45

用VBA

zxyding · 发表于 2003-1-9 09:06

我要拷贝的页码中包含一个表格，要把表格除表头外统统清空。

zxyding · 发表于 2003-1-9 10:41

那么如何清空要求清空的部分呢？除表头外还有一些单元格不能清空。

zxyding · 发表于 2003-1-9 10:44

条件是不确定哪个单元格要清空。

zxyding · 发表于 2003-1-9 11:17

我的意思是什么样的属性可以做到让我确定这个单元格应该清空，同时不会过多影响到表格。

[此贴子已经被作者于1/9/2003 11:17:21 AM编辑过]

zxyding · 发表于 2003-1-10 08:34

谢谢！

惊叹不已 · 发表于 2003-1-9 15:14

st=Left(Selection.Text,Len(Selection.Text)-2) 可以得出单元格的内容,至于应不应该清空,只有你才知道了.

惊叹不已 · 发表于 2003-1-9 10:56

ActiveDocument.Tables(1).Cell(2, 1).Select Selection.Delete 是清空表格的第2行第1个单元格要清空其他单元格可改变这两个数字.

惊叹不已 · 发表于 2003-1-9 10:37

MsgBox "当前页号:" & Selection.Information(wdActiveEndAdjustedPageNumber) ActiveDocument.Tables(1).Cell(2, 1).Select Selection.MoveEnd wdTable Selection.Delete

		自动登录	找回密码
密码			免费注册