作者kgreatheart (神之左手魔之右手)
看板Visual_Basic
标题[VBA ] 如何读取 Button 上的 Text (编辑文字)
时间Mon Mar 28 00:11:11 2011
用VBA建立5个Button，
Text(编辑文字)分别为 A , B , C , D , E
OnAction="Module2.abc" 设定一样
当我按下 A Button时，希望能跳出一个视窗显示 A
所以写 MsgBox Selection.Characters.Text
跳出的视窗却是显示空白
有什麽指令可以按下Button，同时可以传回 Button 的 Text (编辑文字)。
因为传回的Text(编辑文字)要写入 Module2.abc
谢谢
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 114.32.232.30
1F：→ necsa:button的text是啥意思? 03/30 00:28
2F：→ kgreatheart:Excel有5个Button，分别标上A~。当我按下标示 A 03/31 00:08
3F：→ kgreatheart:的 Button时，因为我有设定OnAction 的关系，所以会连 03/31 00:10
4F：→ kgreatheart:结到Module2.abc这个副程序。但我希望程式能知道我是 03/31 00:12
5F：→ kgreatheart:按 A 。因为这5个Button都是连结到Module2.abc。 03/31 00:15
6F：→ kgreatheart:按A，Module2.abc某个参数就会写成A；写B，就会写成B 03/31 00:20
7F：→ kgreatheart:按下C,D或E，同理。如果找不到指令的话，那就只有分别 03/31 00:24
8F：→ kgreatheart:写5个副程序，分别关於按A,B,C,D,E。 03/31 00:27
9F：→ necsa:5个button是否在同一个物件上,如同一worksheet?是的话在该物 04/01 16:16
10F：→ necsa:件宣告Public字串变数,button被按下会触发click(),在每个 04/01 16:20
11F：→ necsa:button的click()定义public字串变数的值并呼叫module.abc. 04/01 16:21
12F：→ necsa:moudle.abc可看到"物件.字串变数"的值. 04/01 16:22