[RESOLVED] Footer values in Word & XL- empty, says its full

Hello,

I need to determine if my footers are empty or not. They keep coming up as filled, although I know they're not.

I've tried these 3 different lines of code.

Code:

---

If IsEmpty(oWordDoc.Sections(1).Footers(1).Range.Text) Then  etc..

---

Code:

---

If IsNull(oWordDoc.Sections(1).Footers(1).Range.Text) Then  etc..

---

Code:

---

If oWordDoc.Sections(1).Footers(1).Range.Text="" Then  etc..

---

In debug, I can tell that there's some stray control character that makes the program think there a true value there.
Do I need to do regular expressions that will only look for A-Z, 0-9 ? Or is there another function call?

I also need to do the same for XL. I Write to the footer like this:

Code:

---

With xlWB.ActiveSheet.PageSetup
        .LeftFooter = ""
        .CenterFooter = footerMsg
End With

---

Thanks,
CyberJar

the character in the word footer is a paragraph mark, chr(13)

vb Code:

if len(oWordDoc.Sections(1).Footers(1).Range.Text) > 1 then ' something extra in the footer