如何使用VBA将Microsoft Word公式导入Microsoft Excel？
我一直在想办法将图片和表格以及其他东西从Microsoft Word 2010到Microsoft Excel 2010 。 我想find一种方法来做同样的事情与OMath对象，或方程式。 我想尽可能保持原始forms，所以如果这意味着将OMath对象翻译成图片（ InlineShape ），那么我就是这么做的。
以下是Word中的公式，我想用VBA导入excel： 
现在，我只能传递这个对象的Range.Textexpression式，这个公式看起来像这样：
我发现我可以select这个对象，并做一个select副本。 有没有办法确定这个select的尺寸？ 我想粘贴在一个特定的单元格中，这个单元格已经被resize以适应等式。 我遍历Word文档的段落，每个段落都被称为DocPara ，当我遇到一个等式时，我select它是这样的：
DocPara.Range.OMaths(1).Range.Select With Selection .CopyAsPicture oWB.ActiveSheet.Paste Destination:=oWB.ActiveSheet.Cells(headingCount, 3) End With
我上面的问题是，图片粘贴在我想要的地方，但比坐在的行还要大，如果我调整行的大小，图片将垂直线性地与行resize。 我需要调整我粘贴之前粘贴这个图像的行。 我怎样才能访问我刚刚放在剪贴板上的图片的大小？
有没有人有一些想法？ 对此，我真的非常感激 ：）
粘贴图片后，在调整行大小之前，将.Placement属性设置为xlMove （使用单元格移动，但不要resize）。 这可以防止图片大小调整。
这相当于设置图片格式属性
