Hi folks,

When I ran the following code, I got €œrun-time error €˜13. Type mismatch€�.
Could anyone tell me how to fix it?

If Evaluate("'" & strFolder & "[" & strFile & "]" & "Data" & "'!C8") =
"" Then
.Value = ""
Else
.Value = "='" & strFolder & "[" & strFile & "]" & "Data" & "'!C8"
.Value = .Value
End If


Thanks in advance.

Tim.