请教：一个VBA问题，急急急，发在office里面问题还没解决，求救.急。。。急。。。急

Question

问题联结是http://community.csdn.net/Expert/topic/3723/3723760.xml?temp=.1832697

Answer 1

这些东西不是写出来的哦，哈哈！！！交你一个笨方法，打开一个 Excel 新建一个宏，然后操作，在察看代码。

Answer 2

打开你的Excel文件，用"工具"-->宏---->VB编辑器
进入你要触发事件的单元格所在的sheet的代码窗口输入：
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 你关注单元的列号 And Target.Row = 你关注单元的行号 Then
        '调用你的宏
    End If
End Sub行列号均从1开始

Answer 3

我这样写了
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 And Target.Row = 2 Then
        Range("A1").Select
        ActiveCell.FormulaR1C1 = "123456"
    End If
End Sub
为什么改变第一列，第二行的时候没执行这个宏呢？

Answer 4

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 And Target.Row = 2 Then
        Range("A1").Value = "123456"
    End If
End Sub

Answer 5

你是在你单元所在的sheet的代码窗口中加的吗？，你的也行啊

Answer 6

如何在单元所在的Sheet的代码窗口中加？？？
打开你的Excel文件，用"工具"-->宏---->VB编辑器
然后？？？