S
Steven Rosenberg
I'm attempting to write a macro which pastes Excel
cells into Word, and manipulates the formating. When I
run the macro, even on the same table used to record
the macro, I get:
RunTime Error 4605 "Select Column method or
property not available because some or all of object
doesn't refer to table occurs."
asterisked line causes the error (as indicated by a
yellow arrow) :
End With
Selection.Tables(1).Select
Selection.Columns.PreferredWidthType =
wdPreferredWidthPoints
Selection.Columns.PreferredWidth =
InchesToPoints(0.92)
Selection.Move Unit:=wdColumn, Count:=1
** Selection.SelectColumn**
Selection.Collapse Direction:=wdCollapseStart
Selection.Move Unit:=wdColumn, Count:=-1
Selection.SelectColumn
Selection.Collapse Direction:=wdCollapseStart
Selection.Move Unit:=wdColumn, Count:=-1
Selection.SelectColumn
Selection.Move Unit:=wdColumn, Count:=1
Selection.SelectColumn
Any ideas?
*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!
cells into Word, and manipulates the formating. When I
run the macro, even on the same table used to record
the macro, I get:
RunTime Error 4605 "Select Column method or
property not available because some or all of object
doesn't refer to table occurs."
asterisked line causes the error (as indicated by a
yellow arrow) :
End With
Selection.Tables(1).Select
Selection.Columns.PreferredWidthType =
wdPreferredWidthPoints
Selection.Columns.PreferredWidth =
InchesToPoints(0.92)
Selection.Move Unit:=wdColumn, Count:=1
** Selection.SelectColumn**
Selection.Collapse Direction:=wdCollapseStart
Selection.Move Unit:=wdColumn, Count:=-1
Selection.SelectColumn
Selection.Collapse Direction:=wdCollapseStart
Selection.Move Unit:=wdColumn, Count:=-1
Selection.SelectColumn
Selection.Move Unit:=wdColumn, Count:=1
Selection.SelectColumn
Any ideas?
*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!