Hello Again Joe, I was just going down the google road when you replied. The part that I am having trouble understanding is where to insert the tag.
Here is what my code looks like now:
Function FindLabel ( [SEC], [TWP], [RGE], )
FindLabel ="<FNT name=""Arial"" size=""18"">" & [SEC] & vbnewline & [TWP]&"-"&[RGE] &" W"&
End Function
But it does really nothing other than actually put that tag in the label. I know I am close, but soooooo far. See attached picture.