excel vba 编程的进下! 我想实现一些事情 求求大家了

来源：百度知道 编辑：UC知道 时间：2024/05/02 12:54:57
1个 我在一个固定表格里 在在 A4列输入1 A5输入#N/A 在A6生成 数字2 在 A4列输入1 A5 输入#N/A 在A6生成 数字2 这个公式可以做到=IF(ISERROR(A5),LOOKUP(9*10^100,$A$1:A5)+1,"") 但是我想用 vba编程写!
2个 就是 识别刚刚在A列中自动填充的数字 填充颜色 A-G 用cba编程写 用条件格式 耗内存 我不想用! 帮帮忙哦!!

我一定超高奖励! 先悬赏30 留着积分求答案 我已经问过好多人了! 我只想知道答案!

不懂我意思 留下 QQ好不!

确实不懂你的意思，用百度HI联系吧。

你说的1不清楚，大概的代码是：
Sub M()
Cells(4, 1) = 1: Cells(5, 1) = CVErr(xlErrNA) '(这个1和错误值是公式得到的？是就删除这句）
If IsError(Cells(5, 1)) Then
Val0 = (9 * 10 ^ 100)
Cells(6, 1) = Application.WorksheetFunction.Lookup(Val0, Range("A1:A6")) + 1
Else: Cells(6, 1) = ""
End If
End Sub
2就一句代码：
Range("A6:G6").Interior.ColorIndex = 6(淡黄色）