已有宏实现Excel表格粘贴至Word内容控件，能否改为粘贴增强图元文件？

Absolutely! You can switch your macro to paste the Excel table as an Enhanced Metafile (EMF)—this vector-based format keeps the table crisp when resized and makes formatting adjustments far easier compared to the raw Excel table paste. Here's the modified code:

' Navigate to the target Excel range
Application.Goto Sheets("Table Pg 2").Range("dTable2")
Selection.Copy

' Paste as Enhanced Metafile into the Word content control
With wordDoc.SelectContentControlsByTag("wTable2").Item(1).Range
    .PasteSpecial DataType:=wdPasteEnhancedMetafile
End With

Key Changes Explained: #

• Replaced PasteExcelTable with PasteSpecial: This method gives you full control over the paste format, instead of relying on Excel-specific table pasting that locks you into rigid spreadsheet-style formatting.
• Added DataType:=wdPasteEnhancedMetafile: This parameter tells Word to convert the copied Excel table into a vector-based EMF graphic. Unlike the raw table, this graphic acts as a single editable object—you can resize it without pixelation, apply Word's shape styles (borders, shadows, fills), and reposition it freely without dealing with Excel's table structure limitations.

Quick Note: #

• Ensure the wdPasteEnhancedMetafile constant is accessible (it will be if your Excel VBA project references the Word Object Library).
• Since EMF is a static graphic, it won't link back to your original Excel range (which aligns with your original LinkedToExcel:=False setting). If you need to update the table data later, you'll just re-run the macro to paste the updated version.

内容的提问来源于stack exchange，提问作者Slugmaster