 |
 | Home | Contact Us | FAQ | Search & Site Map | Link to Us |
 | Sign In | Join | Other 45 Sites in Network |
| HomeDiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWordDirectoryUser Groups Related Topics Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ... |
MS Office Forum / Word / Programming / March 2006Shape
I want to remove all the Shapes that are in the top of InlineShapes, and ONLY those. I already have a code that select the InLineShape and format them. What I can't do, is Delete all the Shapes in the select Paragraph, or in the InlineShapes. Can you help me with this? RRodrigues was telling us: RRodrigues nous racontait que : > I want to remove all the Shapes that are in the top of InlineShapes, > and ONLY those. Sorry, but I don't quite get what you mean by this.  SignatureSalut! _______________________________________ Jean-Guy Marcil - Word MVP jmarcilREMOVE@CAPSsympatico.caTHISTOO Word MVP site: http://www.word.mvps.org Ok, let me rephrase it. In my document, I have several pictures. In some of them, I have drawn some shapes. Now I want to delete the shapes that are in the top of the pictures. However, I have also made some shapes in the rest of the document, and I want to keep these ones. I guess one of the ways, is selecting the Paragraphs that contain the Inline Shapes, and then Delete the Shapes in the Selection. I have already created a code that selects these Paragraphs. What I need is a code to delete the Shapes that are in this selection. Can you help me with this? > RRodrigues was telling us: > RRodrigues nous racontait que : [quoted text clipped - 3 lines] > > Sorry, but I don't quite get what you mean by this. Use this code: On Error Resume Next Selection.Range.ShapeRange.Delete It will delete any floating shapes but leave inline shapes intact. (The On Error statement prevents a "Requested object is not available" error if the paragraph doesn't contain any floating shapes.) -- Regards, Jay Freedman Microsoft Word MVP FAQ: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. >Ok, let me rephrase it. >In my document, I have several pictures. [quoted text clipped - 15 lines] >> >> Sorry, but I don't quite get what you mean by this. Thank you! That was perfect! You're the best! > Use this code: > [quoted text clipped - 31 lines] > >> > >> Sorry, but I don't quite get what you mean by this. |
Reply to this Message |
 Sign In
 Join
 My Latest Posts My Monitored Threads My Blog My Photo Gallery My Profile My Homepage Start New Thread Enable EMail Alerts Rate this Thread
|
©2008 Advenet LLC Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.