Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Paragraph Cut/Paste

4 views
Skip to first unread message

Ralf Schneider

unread,
Aug 26, 2004, 9:19:28 PM8/26/04
to corel.graphic_apps.draw-script

Is it possible to VBA cut/paste text from one paragraph text object to
another paragraph object, without losing the original formatting
(font/size/bold etc)?

Thank you
-Ralf.

Alex Vakulenko

unread,
Sep 1, 2004, 8:39:14 PM9/1/04
to corel.graphic_apps.draw-script

Here is an example for you. Copies the text from the current text object and
then creates another paragraph text and pastes the copied text into it:

Sub CopyPasteText()
Dim s As Shape
ActiveShape.Text.Story.Copy
Set s = ActiveLayer.CreateParagraphText(0, 0, 2, 2)
s.Text.Story.Paste
End Sub

I hope this helps.

Alex
www.oberonplace.com

"Ralf Schneider" <ra...@dynamco.com.au> wrote in message
news:412e865d_3@cnews...

Ralf Schneider

unread,
Sep 16, 2004, 12:42:54 AM9/16/04
to corel.graphic_apps.draw-script

Unfortunately the format of the original text is lost. It changes to the new
object font/style.

"Alex Vakulenko" <alexv@vakcer_dot_com> wrote in message
news:413665dc_1@cnews...

Alex Vakulenko

unread,
Sep 16, 2004, 8:34:02 AM9/16/04
to corel.graphic_apps.draw-script

Hmmm, Not on my machine... (???)

Alex

"Ralf Schneider" <ra...@dynamco.com.au> wrote in message

news:4149143a_1@cnews...

0 new messages