Office中国论坛/Access中国论坛

标题: 当储存格输入任何值后，都自动执行宏. [打印本页]

作者: linn339 时间: 2011-8-27 11:02
标题: 当储存格输入任何值后，都自动执行宏.
请后附件！！谢了![attach]46523[/attach]

作者: pureshadow 时间: 2011-8-27 12:24
用工作表事件
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

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
噢，，。，

作者: joyark 时间: 2011-8-29 06:04
處理得很好

作者: joyark 时间: 2011-8-29 06:07
标题: RE: 当储存格输入任何值后，都自动执行宏.
当储存格输入任何值后，都自动执行宏.

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)