 |
 | 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 / December 2006Anchoring text boxes on the first paragraph of a page
I have macros to insert three text boxes in different positions on the current page along the left or right margin. Because they are anchoring themselves to the nearest paragraph which could be deleted while editing I¹d like to anchor them to the the first paragraph of the page in the hope that such an anchor is more stable. If I use this line: MyTBox.Anchor = ActiveDocument.Paragraphs(1).Range the text box is placed on the first page of the document and in the bottom margin of the first page - nowhere near the position I have stated in the macro (why does it ignore the top and left positions in the macro just because it is anchored to the first paragraph of a document?). I have tried variations on this line of code but VB just gives me error messages, mostly ³object not found². I cannot find code for anchors on the top paragraph of a current page, so can someone help me with this? Also can more than one anchor be placed on the same paragraph. Any help much appreciated. Sol You could anchor them to the header or footer to minimise the chance of them being deleted inadvertently. They can still be positioned anywhere on the page. The positioning problem has nothing to do with the paragraph to which they are anchored unless you have set the position to be relative to the anchor paragraph. You need it to be absolute, relative to the page. You also need to make sure that the textboxes aren't interfering with each others' positions (eg allow overlap etc). And it would be wise to lock the anchor. Yes, you can have more than one object anchored to the same paragraph. >I have macros to insert three text boxes in different positions on the > current page along the left or right margin. Because they are anchoring [quoted text clipped - 23 lines] > > Sol Thanks Jezebel. I cannot set the empty text boxes to the header and footer as it will make it too difficult for the template users to put anything in and move them around as they¹ll have to open the header/footer. They are side text boxes, inserted on demand, for putting in text, pull quotes or pictures, etc as illustrations to the main text and will always require some manipulation. (Ideally such a template should be in Quark or InDesign, but the client wants it in Word.) I can ensure that the position is absolute but I do not know how to have all the text boxes absolutely anchored to the first paragraph. Can anyone help me with this? Thx Sol On 5/12/06 14:45, in article uWzWSwHGHHA.1252@TK2MSFTNGP02.phx.gbl, > You could anchor them to the header or footer to minimise the chance of them > being deleted inadvertently. They can still be positioned anywhere on the [quoted text clipped - 35 lines] >> >> Sol Drag the anchors to the first paragraph, then lock the anchors. As long as the first paragraph is not deleted, your textboxes will remain present and in place. > Thanks Jezebel. I cannot set the empty text boxes to the header and footer > as it will make it too difficult for the template users to put anything in [quoted text clipped - 64 lines] >>> >>> Sol Hi Jezebel I know how drag anchors manually, but the textboxes are inserted by macro. They are not on the template or the document until the user clicks on a toolbar button for a ³top left² text box, or a ³middle right² text box, etc. What I don¹t know is the code for positioning a text box on the top paragraph of a page so I can put this code into each relevant macro, and I haven¹t been able to find it searching through VB help (Mac) or through various VB newsgroups. Thx Sol On 5/12/06 16:21, in article u2pNnlIGHHA.536@TK2MSFTNGP02.phx.gbl, "Jezebel" <warcrimes@whitehouse.gov> wrote: > Drag the anchors to the first paragraph, then lock the anchors. As long as > the first paragraph is not deleted, your textboxes will remain present and [quoted text clipped - 68 lines] >>>> >>>> Sol Hi Sol, > What I don¹t know is the code for positioning a text box on the top > paragraph of a page so I can put this code into each relevant macro, and I > haven¹t been able to find it searching through VB help (Mac) or through > various VB newsgroups. Make sure the current selection is on the page in question. then Dim rng as Word.Range Dim rngPara as Word.range Set rng = ActiveDocument.Bookmarks("\Page").Range Set rngPara = rng.Paragraphs(1).Range But you want to test this with paragraphs that break across pages, as these might throw off the result, depending on what result you need. You may need, in addition, to check whether the first and last characters in the paragraph range are on the same page. Cindy Meister INTER-Solutions, Switzerland http://homepage.swissonline.ch/cindymeister (last update Jun 17 2005) http://www.word.mvps.org This reply is posted in the Newsgroup; please post any follow question or reply in the newsgroup and not by e-mail :-) |
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.