OberonPlace.com Forums  

Go Back   OberonPlace.com Forums > Developer Forums > VBA > CorelDRAW/Corel DESIGNER VBA

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 02-10-2003, 06:25
D_Green
Guest
 
Posts: n/a
Default Selection of Text off-page

As the result of of importing files (all textual details) , some of the textshapes are off-page (on Desktop layer) and even some distance from the drawing page. This text, in general, is rubbish text and not required. Whilst I have no problems in having written a macro to select / find the text on-page and then change the text properties, I am finding it problematic in making a selection of all off-page textshapes.

Is it possible / permissable to make a selection from this off-page text, that resides on the "Desktop" layer.

Thanks for any advice that may be forthcoming.

My fingers are getting sore from scratching my head !!!!
Reply With Quote
  #2  
Old 04-10-2003, 06:07
jmp
Guest
 
Posts: n/a
Default

Hi,

Deleting all text shapes that resides on the desktop :

Code:
ActiveDocument.Pages(0).Layers("Desktop").FindShapes(, cdrTextShape, True).Delete
But all off-page shapes are not automatically on the desktop. I have noticed that these shapes will be on the desktop after you have (added or)selected another page...

Regards,
Jean-Marie
Reply With Quote
  #3  
Old 04-10-2003, 16:34
D_Green
Guest
 
Posts: n/a
Default

Jean-Marie,

Many thanks, your solution is just what I was after. As I wasnt deleting the off-page textshapes, in the first instance, till after I had done a quick check of the selected textshapes, to ensure that no "real info" was being deleted, it was a case of substituting your '.delete' with '.createselection'.

ActiveDocument.Pages(0).Layers("Desktop").FindShapes(, cdrTextShape, True).Delete

ActiveDocument.Pages(0).Layers("Desktop").FindShapes(, cdrTextShape, True).CreateSelection

You are correct about these textshapes only appearing on "desktop" after adding pages etc. This poses no problems, in my case, as all my imports etc. always create a large number of pages.

Once again, many thanks for help resolve this quirky problem of mine.

Best Regards,
Denis
Reply With Quote
Reply


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Importing only 1st page from a multipage CDR mecanomaniaco CorelDRAW/Corel DESIGNER VBA 3 28-02-2005 17:21
format text dialog box implement graphicdesigner CorelDRAW/Corel DESIGNER VBA 5 22-12-2004 13:37
Reset text after text compression. Bellekom CorelDRAW/Corel DESIGNER VBA 2 05-05-2004 06:14
Text selection problem ken_ac CorelDRAW/Corel DESIGNER VBA 2 10-02-2004 20:24
Page selection and object moving problems wbochar CorelDRAW/Corel DESIGNER VBA 1 15-04-2003 09:10


All times are GMT -5. The time now is 03:06.


Powered by vBulletin® Version 3.8.1
Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
Copyright © 2011, Oberonplace.com