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 05-07-2021, 08:28
aakkaarr aakkaarr is offline
Senior Member
 
Join Date: Jan 2009
Posts: 162
Default Replace part text of text shape

VBA code to Replace part text of text shape
Reply With Quote
  #2  
Old 03-09-2021, 20:57
shelbym's Avatar
shelbym shelbym is offline
Senior Member
 
Join Date: Nov 2002
Location: Cheyenne, WY
Posts: 1,788
Blog Entries: 12
Send a message via ICQ to shelbym Send a message via AIM to shelbym Send a message via MSN to shelbym Send a message via Yahoo to shelbym
Default Replace Part Text of Text Shape

You can use the Text.Replace for this. Here is quick example from the API Documentation:
Code:
Sub Test()
  Dim s As Shape
  For Each s In ActivePage.FindShapes(, cdrTextShape)
    s.Text.Replace "#", CStr(Date), False, ReplaceAll:=True
  Next s
End Sub
Happy Coding,

-Shelby
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
font text replace macro gorgo CorelDRAW/Corel DESIGNER VBA 2 24-06-2011 23:10
Curving text within a shape (as paragraph text) SallyS General 1 28-04-2011 22:03
Find and replace text, and only changed the Scale pithe CorelDRAW/Corel DESIGNER VBA 8 20-01-2011 14:47
How selected a part of text TheFez CorelDRAW/Corel DESIGNER VBA 2 22-05-2008 07:07
Find and Replace Text with Form RVogel CorelDRAW/Corel DESIGNER VBA 1 24-03-2005 09:37


All times are GMT -5. The time now is 20:01.


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