Creating word documents

[Eagle]

I am trying to change the linewidth of a page border, and keeping getting an
error at the "wdLineWith075pt" For some reason, it only accepts the value
of 24 like the left border. Yet when I print the document that has been
created, the right border does not print, so I've been trying to put in
different values and I get an error on all values I've tried other than 24.
Does anyone have an idea of what I'm doing wrong?

Dim Word As Object
Dim rtf As ActiveReportsRTFExport.ARExportRTF
Set Word = CreateObject("word.Application")
Set rtf = New ActiveReportsRTFExport.ARExportRTF
rtf.FileName = "c:\temp.RTF"
rep.Run False
rtf.Export rep.Pages
Word.Documents.Open rtf.FileName

With Word.Documents(1).Sections(1)
'left border
.Borders(wdBorderLeft).LineStyle = 9
.Borders(wdBorderLeft).LineWidth = 24
.Borders(wdBorderLeft).ColorIndex = 0

'right border
.Borders(wdBorderRight).LineStyle = 9
.Borders(wdBorderRight).LineWidth = wdLineWidth075pt
.Borders(wdBorderRight).ColorIndex = 0

'top border
.Borders(wdBorderTop).LineStyle = 9
.Borders(wdBorderTop).LineWidth = 24
.Borders(wdBorderTop).ColorIndex = 0

'bottom border
.Borders(wdBorderBottom).LineStyle = 9
.Borders(wdBorderBottom).LineWidth = 24
.Borders(wdBorderBottom).ColorIndex = 0

'all borders
.Borders.DistanceFrom = 1
.Borders.AlwaysInFront = True
.Borders.SurroundHeader = True
.Borders.SurroundFooter = True
.Borders.JoinBorders = False
.Borders.ApplyPageBordersToAllSections

End With
Word.Visible = True
UserControl.MousePointer = vbDefault
Set Word = Nothing
Set rtf = Nothing
Set rep = Nothing
End Sub
Thanks for your help.