13问答网 > EXCEL中用VBA实现自动记录改动日志,老是报错误13 类型不匹配代码如下:

EXCEL中用VBA实现自动记录改动日志,老是报错误13 类型不匹配代码如下:

2025-04-28 16:58:42

推荐回答（2个）

回答1：

改成这样：
Dim XX

Private Sub Worksheet_Change(ByVal Target As Range)
Dim ROW1
With Sheets("日志")
On Error Resume Next
If XX <> Target Then
ROW1 = Sheets("日志").[A65536].End(xlUp).Row + 1
.Cells(ROW1, 1) = Date
.Cells(ROW1, 2) = Time
.Cells(ROW1, 3) = XX
.Cells(ROW1, 4) = Target.Value
.Cells(ROW1, 5) = Target.Worksheet.Name
.Cells(ROW1, 6) = Target.Address
End If
End With
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
XX = Target.Value
End Sub

回答2：

什么是让他发现改动返回单元格的第一个位置

EXCEL中用VBA实现自动记录改动日志,老是报错误13 类型不匹配 代码如下:

EXCEL中用VBA实现自动记录改动日志,老是报错误13 类型不匹配代码如下: