#1
|
|||
|
|||
Convert equation objects to inline objects
Hi, I'm using the following macro to convert floating equation objects that appear as display equations (not run on with text) to inline objects Code:
Sub ConvertToInline() Dim i As Integer For i = ActiveDocument.Shapes.Count To 1 Step -1 Select Case ActiveDocument.Shapes(i).Type Case msoEmbeddedOLEObject, msoLinkedOLEObject, msoLinkedPicture, msoOLEControlObject, msoPicture, _ wdInlineShapePicture, wdInlineShapeLinkedPicture: ActiveDocument.Shapes(i).ConvertToInlineShape End Select Next i End Sub Can someone help with this? Last edited by macropod; 01-29-2013 at 08:26 PM. Reason: Added code tags & formatting |
#2
|
||||
|
||||
Hi sumjoh,
When a floating shape is converted to in-line, its position on the page is determined by the position of the shape's anchor prior to conversion. Thus, if the anchor is at the start of a paragraph (which is the default), the in-line shape will be positioned at the start of that paragraph. Accordingly, you'll need to move the anchor before converting, or the in-line shape after converting. Also, since wdInlineShapePicture and wdInlineShapeLinkedPicture are already in-line, you can't convert them to that wrap format. Those references may as well be deleted.
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
Tags |
equations, floating objects, inline objects |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Can't Shift Objects Off Sheet - What is that? | namedujour | Excel | 5 | 05-13-2011 06:30 AM |
Shrinking objects in powerpoint | lrae | PowerPoint | 0 | 03-01-2011 10:36 AM |
Shape Objects | Space Cowboy | PowerPoint | 4 | 10-04-2010 07:14 PM |
NOprintable objects | shadowbat | Drawing and Graphics | 0 | 07-05-2010 10:13 PM |
Group objects in Office | Alfie | Drawing and Graphics | 3 | 04-16-2009 10:24 AM |