Macros to Copy Paste Special from Excel to Word

Hello,

I have written a short macros, which copy data range from Excel and paste it special as Enhanced Metafile in table cell in Word file.
The problem is that picture pasted is much larger than cell. But I need it fit the cell (cell size is fixed).
Maybe anybody had the same kind of a problem and can give an advice?

I used the code below. Maybe any is missing?

Selection.PasteSpecial Link:=False, DataType:=wdPasteEnhancedMetafile, Placement:=wdInLine, DisplayAsIcon:=False

Or give an advice how to resize pasted object.
Thanx a lot in advance!

Please, help!

Any ideas?