V
Vick
What I'm trying to do is have a macro to check the certain merged cells for
character limits. If a merged cell is over 1024 characters, I want it to
display an error message. The error message part is fine, it's displaying how
I want. But I can get the If statement to work right. If there is any
characters in the Merged cell it displays the error. The code I've been
trying is below. Any hints or rewrite would appreciated. Thanks
Range B11:H12 is one merged cell, if that helps at all
Txtcll = 1024
Range("B11:H12").Select
If Len(ActiveCell.Value) > Txtcell Then
MsgBox ActiveCell.Address + " Contains too many characters,
please copy some of you text to another line."
Exit Sub
End If
Vick
character limits. If a merged cell is over 1024 characters, I want it to
display an error message. The error message part is fine, it's displaying how
I want. But I can get the If statement to work right. If there is any
characters in the Merged cell it displays the error. The code I've been
trying is below. Any hints or rewrite would appreciated. Thanks
Range B11:H12 is one merged cell, if that helps at all
Txtcll = 1024
Range("B11:H12").Select
If Len(ActiveCell.Value) > Txtcell Then
MsgBox ActiveCell.Address + " Contains too many characters,
please copy some of you text to another line."
Exit Sub
End If
Vick