Control a Table in Word From Excel

[Simon]

Hi, I use code that sends a range of excel tables to bookmarks in word. It
all works well (I have modified the following code if curious
http://www.vbaexpress.com/kb/getarticle.php?kb_id=133 )

Once a table or picture is sent to word, I'd like to be able to format it Eg
IncrementRotation -90 or wdAutoFitContent


I get a run time error on the 3rd line of the following code:

appWrd.Selection.PasteSpecial DataType:=wdPasteRTF, Placement:=wdInLine
appWrd.Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
appword.Selection.Tables(1).AutoFitBehavior (wdAutoFitContent)

I've tried a few ways of trying to pick up the table i've just created in
word, but struggling.

Any help would be appreciated.

Regards
Simon

 

[Ardus Petus]

Probably a typo: yo types appword instead of appWrd

Cheers

 

[Simon]

Hi, thanks Ardus....you were correct....table works ok now.

However I'm still having trouble trying the control a 'picture' in word. I'm
using the following code:

appWrd.Selection.PasteSpecial DataType:=wdPasteEnhancedMetafile,
Placement:=wdInLine
appWrd.Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
appWrd.Selection.Shape(1).ShapeRange.IncrementRotation -90

I get a run time error on the third line. Any idea how I can rotate the
picture I have just pasted into word?