Question

EXCEL运行时错误1004应用程序定义或对象定义错误，

点调试后Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 4 Then
Target.Offset(0, 2) = Now()（这个是黄背景的）
End If
End Sub
请高手解决，我这个代码的原意是输入D列后自动在F列录入当前时间不更新，

Answer 1

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 4 Then
Cells(Target.Row, 6).Value = NOW '(这个是凯哪余黄背景的)
End If

End Sub
NOW后面不盯滚缓巧带括号

追问

可是我去掉了还是不行吖

追答

这样：Cells(Target.Row, 6).Value = NOW
或：
Range("d" & Target.Row).Offset(0, 2) = Now
行吗

Answer 2

搞搞打孙扒印机设置吧，或许有用
设置成发送至OneNote之类的，或者其他之则蠢昌前已经指定了的打印机
我的就是执行宏运算时出现1004，重新设档嫌置了下默认打印机就好了

Answer 3

重新运慧锋行EXCEL--单击开发工具--加载项--加载宏--删除失效的宏，就不会出现运行时前氏晌错误1004提示。核培