Compile error: type mismatch

  • Thread starter Thread starter pjhageman
  • Start date Start date
P

pjhageman

Excel 2000
I am getting a Compile error: Type Mismatch, "G26" is highlighted. How
do I clear this problem?

Public Function ValidScorecard() As Boolean
Dim sMsg As String
ValidScorecard = True
sMsg = sMsg & CheckRange("G26") <---------
sMsg = sMsg & CheckRange("AG26")
sMsg = sMsg & CheckRange("G44")
sMsg = sMsg & CheckRange("AG44")
If Len(sMsg) > 0 Then
MsgBox sMsg
ValidScorecard = False
End If
End Function
 
Looks as though CheckRange wants a range, not a string.
Try:
sMsg = sMsg & CheckRange(Range("G26"))

Rob
 
Back
Top