Error message is Character Limit is over 1024 characters

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
 
B

Barb Reinhardt

FWIW, I found this by using Option Explicit before the code. It forces you
to declare all variables.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top