请高手赐教,关于VBA 在execl中 selection的运用.

starbattler 2003-07-07 08:42:10
我在execl中如何运用selection这个对象?
有那些方法\属性 另外我这个对象需要申明吗?
在其他

我想要做的是激活所选的单元格中一个button(是一个图标),以此引发一个宏.

请赐教.

如有可能,请给出一些例子.
by the way,大家如果有关于这个话题的书啊,文章啊,能不能告诉我.
...全文
1105 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
starbattler 2003-07-11
  • 打赏
  • 举报
回复
top
starbattler 2003-07-09
  • 打赏
  • 举报
回复
现在情况越来越明白了。是这样。~请恕我罗嗦

别人在execl里用vba创建了一个button(一个图片而已),按了它就会触发一个宏,我想模拟一次鼠标点击它的事件。它的位置是根据数据库信息的变化的。而且由于execl很大,这个按钮是在屏幕之外的。目前,我可以用select方法,选中这个按钮,而且这个按钮 能跑到屏幕的可视区来。我能得到这个按钮的绝对坐标,但是,模拟鼠标只能用屏幕的相对坐标。如何把按钮的绝对坐标和模拟鼠标点击的 相对坐标,联系起来。能否通过换算,知道一个(绝对坐标)而得到另一个(相对坐标)???使我能模拟鼠标 准确的按到那个按钮!
starbattler 2003-07-08
  • 打赏
  • 举报
回复
小弟受教

那如何返回selection的 选中对象的绝对坐标!(不是窗体的相对坐标.因为selection对象是在屏幕之外的)
我要在选中这个selection对象之后再模拟一次鼠标点击事件.
jhj2002 2003-07-08
  • 打赏
  • 举报
回复
selection.row 表示选择的第一行的绝对坐标
selection.rows.count 表示选择的行数

列雷同

你要是鼠标点击事件


Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

end sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub

里加入你的代码
里面的参数target 和你所说的selection是一样的
tankkxx 2003-07-07
  • 打赏
  • 举报
回复
注意:最好在代码中重新定义一个range来引用用户的selection,否则会改变用户的selection。
在线帮助上有说明,不过在2003中有稍微的改变
EdwardZhou 2003-07-07
  • 打赏
  • 举报
回复
Selection 属性
适用于
Application 对象、Windwos 对象
描述
Application 对象:返回当前窗口中的选定对象;
Windwos 对象:返回指定窗口中的选定对象。

返回对象的类型由当前选定的对象决定,比如选定对象是单元格,此属性返回的将是 Range 对象。如果没有选定任何对象,Selection 属性将返回 Nothing。

示例一,清除 Sheet1 中选定单元格的内容:
Worksheets("Sheet1").Active
Selection.Clear

示例二,显示选定对象的 VB 对象类型:
Worksheets("Sheet1").Active
Msgbox"The selection type is "& TypeName(Selection)




5,172

社区成员

发帖
与我相关
我的任务
社区描述
其他开发语言 Office开发/ VBA
社区管理员
  • Office开发/ VBA社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧