Issue with TextWidth Function

[JTBorton]

So I'm trying to use the textwidth function to correctly size a column header of my listview control. However, VBA doesn't seem to recognize this command. Is the TextWidth function not available in VBA? I thought it was a standard function for printing.

Dim objColumnHeader As ColumnHeader
    Dim itmTagName As ListItem
    Dim lvwTags As ListView
    
    Set lvwTags = lvwTagList
    Set objColumnHeader = lvwTags.ColumnHeaders.Add(, , "TagID", [highlight]textwidth("TagID")[/highlight])

-JTBorton
Well, You can try banging your head against the wall, but you just end up with lost-time injuries and damaged equipment. [M. Passman]

 

[PHV]

Have a look here:

http://msdn.microsoft.com/en-us/library/aa199133(office.10).aspx

Seems like you should have an Access.Report object ...

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[PHV]

Ho, you meant VB instead of VBA ?

http://msdn.microsoft.com/fr-fr/lib...ting.compatibility.vb6.printer.textwidth.aspx

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[PHV]

Ho, you meant VB instead of VBA ?

http://msdn.microsoft.com/en-us/lib...ting.compatibility.vb6.printer.textwidth.aspx

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[JTBorton]

Ahh. This function must only be for Access. I'm using Excel 2007.

-JTBorton
Well, You can try banging your head against the wall, but you just end up with lost-time injuries and damaged equipment. [M. Passman]

 

[strongm]

My code in thread222-1036091 should give you the text width in any VBA host that knows what a Font (well a StdFont) is ...

 

[JTBorton]

Hey, thanks again guys. You're a great help as always. Unfortunately this project has had to take a major backseat. I'll take a look at it again when I can.

-JTBorton
Well, You can try banging your head against the wall, but you just end up with lost-time injuries and damaged equipment. [M. Passman]