我所拥有的：一个Excel文件，其中的一列（实际上它是自由格式的，但在列内对齐）中的一些元素嵌入了bmp图片，=EMBED("Paint.Picture","")当您单击它们时，它们会显示公式。当您查看 Excel 工作表时，仅显示代表图片的图标，而不显示图片本身。
我想要的：将嵌入的图片（不是图标）复制到新的Word文档中。
到目前为止我的代码：
'Image Objects
Dim myObjs As Shapes
Dim myObj As Shape
Set myObjs = ActiveSheet.Shapes
'Traversing objects
Dim row As Integer
Dim myRange As Range
Dim myRange2 As Range
Dim isAddressMatch As Boolean
'Word Document Objects
Dim wordApp As New Word.Application
Dim myWord As Word.Document
'Prepare word for output
Set myWord = wordApp.Documents.Add
wordApp.Visible = True
'Initalize traversing objectts
Set myRange = Sheets("myWorksheet").Range("Q5")
Set myRange2 = Sheets("myWorksheet").Range("E5")
row = …