Office中国论坛/Access中国论坛

标题: [求助]Private Sub Worksheet_Change(ByVal Target As Range)宏怎么运行? [打印本页]

作者: wql36721 时间: 2006-3-26 22:54
标题: [求助]Private Sub Worksheet_Change(ByVal Target As Range)宏怎么运行?
我编了一个
Private Sub Worksheet_Change(ByVal Target As Range)

Dim iRow, iCol As Integer

iRow = Target.Row

iCol = Target.Column

If iRow >= 2 And iCol = 2 And Target <> "" Then

..........

Cells(iRow, iCol + 6) = ""

End If

End Sub

以上已调试无问题.

但不知怎么运行它.

请指点!

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