例如:
一段代码
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("d7") <> "=VLOOKUP(M22,DataBase!A2:D4,2,FALSE)" Then
MsgBox "请先输入批量号码!"
Range("d7") = "=VLOOKUP(M22,DataBase!A2:D4,2,FALSE)"
End If
End Sub报错了,错误代码号为13,是说 类型不匹配!
大家帮帮忙!
一段代码
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("d7") <> "=VLOOKUP(M22,DataBase!A2:D4,2,FALSE)" Then
MsgBox "请先输入批量号码!"
Range("d7") = "=VLOOKUP(M22,DataBase!A2:D4,2,FALSE)"
End If
End Sub报错了,错误代码号为13,是说 类型不匹配!
大家帮帮忙!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货