请教一句vba语句的含义

Robinhuang · 发表于 2005-1-13 15:54

l1 = Selection.Information(wdFirstCharacterColumnNumber) 这句啥意思？ Selection.EndKey Unit:=wdStory l2 = Selection.Information(wdFirstCharacterColumnNumber) 与第一句的结果是否一致？

守柔 · 发表于 2005-1-13 16:10

wdFirstCharacterColumnNumber 返回指定的所选内容或区域中第一个字符的位置。如果所选内容或区域是折叠的，则返回紧靠所选内容或区域右侧的字符编号（该编号与状态栏中“列”后面的字符列数相同）。

以下代码将所选内容移至当前文字部分的末尾。如果所选内容位于文档正文部分，则本示例将所选内容移至文档的末尾。

Selection.EndKey Unit:=wdStory

由于SELECTION.START位置一致,两者是相同的.不知楼主想做到什么目的或要求?

Sub Test()

l1 = Selection.Information(wdFirstCharacterColumnNumber)

Debug.Print l1

Selection.EndKey Unit:=wdStory

l2 = Selection.Information(wdFirstCharacterColumnNumber)

Debug.Print l2

End Sub

Robinhuang · 发表于 2005-1-13 17:09

li1 = Selection.Information(wdFirstCharacterLineNumber) 不，我想起原本的构想了。应该是要取得当前行的行号，即第几行！

守柔 · 发表于 2005-1-14 07:32

我想昨天看到的贴子哪去了，你自己删了吗？“

删除帖子《本帖子为回复帖子》，原因：内容不符合，没有对用户进行分值操作

2005-1-13 17:15:33

”，其实自己点一下编辑就可以了。

三楼的贴子，就是取得当前行的行号啊！你应该将你的目的写清楚，是要判断选定内容有几行呢？还是选定内容的首行行号与尾行行号呢？还是其它呢。

Robinhuang · 发表于 2005-1-14 21:49

sorry,这是我之前写的，现在想要优化一下！由于时间有点久，有些语句忘记作用了！所以拿出来请教！

[此贴子已经被作者于2005-1-14 21:51:24编辑过]

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