CSDN首页 空间 新闻 论坛 Blog 下载 读书 网摘 搜索 .NET Java 视频 接项目 求职 在线学习 买书 程序员 通知
可用分押宝游戏火热进行中... 专题改版:Java Web 专题
CSDN社区
搜索 收藏 打印 关闭
CSDN社区 >  VB >  VBA

word 表 index 100分

楼主mtssdlh(老虎)2006-03-04 13:59:23 在 VB / VBA 提问

我在word文档上面加了3个表  
  怎么知道当前鼠标点中的表的索引号,选中的到底是tables(1)到底是tables(2)还是tables(3),书签有bookmarkid,看selection.bookmarkid就知道了,但是tables好像没有这个东西嘛,怎么办啊  
  在线等待.......  
  问题点数:100、回复次数:7Top

1 楼faysky2(出来混,迟早是要还嘀)回复于 2006-03-04 15:18:33 得分 0

直接操作Selection的东西就行  
  你可以录制宏,看看宏代码就知道了  
   
  '打开Word,在菜单的"工具"->"宏"->"录制新宏",然后开始对Word操作,操作完了停止录制宏,在"宏"->"Visual   Basic编辑器"->"模块"里的模块就有你录制的过程的代码,把需要的代码稍微修改就可以直接应用到vb里Top

2 楼mtssdlh(老虎)回复于 2006-03-04 15:44:16 得分 0

宏里面没有这个东西,对于宏我很熟的  
  我现在要判断选中哪个表,然后在执行一些操作,不知道选中的是哪个表就不知道该执行哪个部分代码了Top

3 楼northwolves(狼行天下)回复于 2006-04-10 19:43:08 得分 0

假设你选了某1个表,可以循环得到表的INDEX:  
   
  Sub   Macro1()  
  Dim   i   As   Integer  
  For   i   =   1   To   ActiveDocument.Tables.Count  
  If   Selection.InRange(ActiveDocument.Tables(i).Range)   Then   Exit   For  
  Next  
  MsgBox   IIf(i   >   ActiveDocument.Tables.Count,   "No   tables   are   selected!",   "tables("   &   i   &   ")   is   selected!")  
  End   SubTop

4 楼flyingZFX(卍 南无阿弥陀佛 卍)回复于 2006-04-19 08:40:11 得分 0

VBA   中Table对象是有index   的  
  你没有找到吗?Top

5 楼flyingZFX(卍 南无阿弥陀佛 卍)回复于 2006-04-19 08:40:33 得分 0

ActiveDocument.Tables(i)       这里的   i   就是   index   呀。Top

6 楼hero_8080(大象追蚂蚁)回复于 2006-04-24 10:34:40 得分 0

如果知道i,就已经知道了,这个问提还用问吗~~~,搂住的意识应该是,鼠标随便点中一个表,然后知道点钟的这个表的index,也就是想知道到底这个ActiveDocument.Tables(i)的i是多少Top

7 楼Modest(塞北雪貂)·(偶最欣赏楼主的分)回复于 2006-04-24 12:13:05 得分 0

支持狼行天下的。  
   
  假设你选了某1个表,可以循环得到表的INDEX:  
   
  Sub   Macro1()  
  Dim   i   As   Integer  
  For   i   =   1   To   ActiveDocument.Tables.Count  
  If   Selection.InRange(ActiveDocument.Tables(i).Range)   Then   Exit   For  
  Next  
  MsgBox   IIf(i   >   ActiveDocument.Tables.Count,   "No   tables   are   selected!",   "tables("   &   i   &   ")   is   selected!")  
  End   SubTop

相关问题

  • word表格
  • DBGrid To 转换 Word 表格
  • 在WORD中操作表格!
  • Word 表格编程问题
  • word中的表格选择
  • word
  • WORD
  • word?
  • word???
  • word 2000和word xp中表格的不同行列值

关键词

  • 代码
  • word
  • 表
  • activedocument
  • 宏
  • 录制
  • 知道
  • 选中
  • tables
  • 东西

得分解答快速导航

  • 帖主:mtssdlh

相关链接

  • Visual Basic类图书
  • Visual Basic类源码下载

广告也精彩

反馈

请通过下述方式给我们反馈
反馈
提问
网站简介|广告服务|VIP资费标准|银行汇款帐号|网站地图|帮助|联系方式|诚聘英才|English|问题报告
世纪乐知(北京)网络技术有限公司 版权所有, 京 ICP 证 020026 号
北京创新乐知广告有限公司 提供技术支持
Copyright © 2000-2007, CSDN.NET, All Rights Reserved
GongshangLogo