[已解决]INPUT("输入",TYPE=8)可以跨表引用吗

QLZ0602 · 发表于 2011-8-26 15:35

本帖最后由 QLZ0602 于 2011-8-26 15:38 编辑

INPUT("输入",TYPE=8)可以跨表引用吗?
如何写VBA语句?

最佳答案

月排行榜 / 总排行榜

爱疯

2011-8-26 16:50

Sub a()
Dim rng, sh
Set rng = Application.InputBox("输入", Type:=8)
sh = rng.Parent.Name
MsgBox sh
End Sub

复制代码

{:22:}

跳转到最佳答案楼层

那么的帅 · 发表于 2011-8-26 15:45

回复 QLZ0602 的帖子

啥意思看不懂

liuguansky · 发表于 2011-8-26 15:53

用application.input试试。

Zipall · 发表于 2011-8-26 16:04

看看这个

http://www.excelpx.com/forum.php?mod=viewthread&tid=185024

jhtjj · 发表于 2011-8-26 16:23

想知道，期盼中。

QLZ0602 · 发表于 2011-8-26 16:41

我用 set rng=application.INPUTbox("输入",TYPE=8)  可以跨表选中单元格(同一excel文件)
也可以获得 rng.address得到单元格地址
  但怎样才能获得 Sheet名呢?

目的是通过INPUTBOX手动修改数据源(可以选择不同的SHEET)


如何写VBA语句?

爱疯 · 发表于 2011-8-26 16:50

Sub a()
Dim rng, sh
Set rng = Application.InputBox("输入", Type:=8)
sh = rng.Parent.Name
MsgBox sh
End Sub

复制代码

{:22:}

QLZ0602 · 发表于 2011-8-26 16:53

对,就是这个效果.

joyark · 发表于 2011-10-5 02:38

非常感谢你哈！呵呵！

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