当储存格输入任何值后，都自动执行宏.

linn339 · 发表于 2011-8-27 11:02:06

请后附件！！谢了!

pureshadow · 发表于 2011-8-27 12:24:21

用工作表事件
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$8" Then
Range("D9").Select
ActiveCell.FormulaR1C1 = "你好"
End If
End Sub

windimi007 · 发表于 2011-8-27 13:11:07

pureshadow 发表于 2011-8-27 12:24
用工作表事件
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$8" Then

妖妖，是不是应该这样呢？

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$8" Then Call ABC
End Sub

复制代码

一直都在 · 发表于 2011-8-27 14:21:18

噢，，。，

joyark · 发表于 2011-8-29 06:04:49

處理得很好

joyark · 发表于 2011-8-29 06:07:39

当储存格输入任何值后，都自动执行宏.

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

群介绍
Excel中国官方交流群2群 (331511605)
Excel中国官方群 (243419633)
Office China for Exc (498717031)
Excel交流群(纯技术) (324568243)
Excel VBA (122204306)

主题相关群

地区相关群[您还没设置居住地]

当储存格输入任何值后，都自动执行宏.

本帖子中包含更多资源

RE: 当储存格输入任何值后，都自动执行宏.

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)