求一个简单的 excel宏

来源:百度知道 编辑:UC知道 时间:2024/06/28 13:25:44
在excel表1中
编一个宏,使得当A1=9时,删除A2到E2的内容,
问题补充:请说详细点,我是菜鸟

Sub deleteA2_E2()
If Range("A1").Value = 9 Then
Range("A2:E2").ClearContents
End If
End Sub

你是要手动运行还是自动运行?
如果是要自动,就是
Private Sub Worksheet_Change(ByVal Target As Range)
If [A1] = 9 Then
Range("A2:E2").ClearContents
End If
End Sub
不过这样的方式,只要是A1=9,你在A2:E2中是输入不进东西的。