TabStop Spaces

[Abhishek]

I was working with tab
Debug.Print "Tabstops count "; .TextFrame.Ruler.TabStops.Count
For x = 1 To .TextFrame.Ruler.TabStops.Count
Debug.Print "Tabstops Position Of "; x; " ";
..TextFrame.Ruler.TabStops(x).Position
Next x

The output was
Tabstops Position Of 1 27
Tabstops Position Of 2 40.5
Tabstops Position Of 3 58.5
Tabstops Position Of 4 67.5
Tabstops Position Of 5 76.5
Tabstops Position Of 6 90
Tabstops Position Of 7 108
Tabstops Position Of 8 121.5
Tabstops Position Of 9 135
Can i get to know how much blank spaces the each is equivalent to.

Regards,
Abhishek

 

[Steve Rindsberg]

I was working with tab
Debug.Print "Tabstops count "; .TextFrame.Ruler.TabStops.Count
For x = 1 To .TextFrame.Ruler.TabStops.Count
Debug.Print "Tabstops Position Of "; x; " ";
..TextFrame.Ruler.TabStops(x).Position
Next x

The output was
Tabstops Position Of 1 27
Tabstops Position Of 2 40.5
Tabstops Position Of 3 58.5
Tabstops Position Of 4 67.5
Tabstops Position Of 5 76.5
Tabstops Position Of 6 90
Tabstops Position Of 7 108
Tabstops Position Of 8 121.5
Tabstops Position Of 9 135
Can i get to know how much blank spaces the each is equivalent to.

Do you want the equivalent in space characters or something else? The width of
a space character will vary with the typeface and font size. You can get that
by looking at the bounding box of a space character in the text box in question
(have a look at .Boundingbox in the object viewer)