Converting Word 6.0 to Word 2000

S

SUDDN

I need to convert a Word 6.0 macro to Word 2000 and I'm almost done.
However I don't really understand the old macro language and was wondering
if someone could help me with four lines that I'm having trouble with.

WordBasic.FormatTabs Position:="", DefTabs:="0.5" + Chr(34), Align:=0,
Leader:=0, ClearAll:=1
WordBasic.FormatTabs Position:="3.69" + Chr(34), Align:=1, Set:=1
WordBasic.FormatTabs Position:="7.31" + Chr(34), Align:=2, Set:=1

Would someone give me the four line equivalent? Thanks
 
D

Doug Robbins - Word MVP

It would be something like:

With Selection.ParagraphFormat.TabStops
.ClearAll
.Add Position:=InchesToPoints(3.69), Alignment:=wdAlignTabCenter
.Add Position:=InchesToPoints(7.31), Alignment:=wdAlignTabCenter
End With

You may have to change the Alignment setting to the desired one of the
following WdTabAlignment constants:

wdAlignTabBar
wdAlignTabCenter
wdAlignTabDecimal
wdAlignTabLeft
wdAlignTabList
wdAlignTabRight


and if you want a leader, you would use

With Selection.ParagraphFormat.TabStops
.ClearAll
.Add Position:=InchesToPoints(3.69), Alignment:=wdAlignTabCenter,
Leader:=wdTabLeaderDots
.Add Position:=InchesToPoints(7.31), Alignment:=wdAlignTabCenter,
Leader:=wdTabLeaderDots
End With

using the desired one of the following WdTabLeader constants:

wdTabLeaderDashes
wdTabLeaderDots
wdTabLeaderHeavy
wdTabLeaderLines
wdTabLeaderMiddleDot
wdTabLeaderSpaces

Check out the TabStops item in the Visual Basic Help File

--
Please post any further questions or followup to the newsgroups for the
benefit of others who may be interested. Unsolicited questions forwarded
directly to me will only be answered on a paid consulting basis.

Hope this helps
Doug Robbins - Word MVP
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top