Solved: Testing the Left Header

[Djblois]

I am trying to run code if the text in the Left Header is Grocery Division and I can't get it to work. Here are the different ways I have tried -

[VBA]leftHeaderText = "Grocery Division"
If ActiveSheet.PageSetup.LeftHeader = leftHeaderText Then[/VBA]

[VBA]If ActiveSheet.PageSetup.LeftHeader = "Grocery Division"[/VBA]

[VBA]If ActiveSheet.PageSetup.LeftHeader = "&""Arial,Bold""&10Grocery Division"[/VBA]

The last one I tried because that is the formating I set.

[mvidas]

Hi,

What was wrong with that last one (aside from putting "Then" at the end of the line)?

However, you can do what you had first using something InStr (i included something to set the left header as well for my testing):[vba]Sub example()
ActiveSheet.PageSetup.LeftHeader = "&""Arial,Bold""&10Grocery Division"

leftHeaderText = "Grocery Division"

If InStr(1, ActiveSheet.PageSetup.LeftHeader, leftHeaderText, vbTextCompare) > 0 Then
MsgBox "Yes"
Else
MsgBox "No"
End If
End Sub[/vba]
Matt

[Djblois]

Thank you for your help, it worked now