TextRange.Paste method - Developer Area

API Documentation > CorelDRAW > 2019.2 > TextRange > IVGTextRange

TextRange.Paste method

Replaces the current text range and returns the new one

Syntax:

Function Paste() As TextRange

Remarks:

The Paste method replaces a text range and returns the new one.

Examples:

The following VBA example creates paragraph text, applies bold formatting to the fourth and fifth words, and italicizes the first word. It then copies the text range and pastes it in the second paragraph.

Sub Test()
  Dim d As Document
  Dim s As Shape
  Dim s1 As Shape
  Dim t As Text
  Set d = CreateDocument
  Set s = d.ActiveLayer.CreateParagraphText(3, 3, 5, 5, _
    "This is an example.")
  Set s1 = d.ActiveLayer.CreateParagraphText(7, 7, 9, 9)
  Set t = s.Text
  t.Story.Words(4, 2).Bold = True
  t.Story.Words(1).Italic = True
  t.Story.Copy
  s1.Text.Story.Paste
End Sub

Version Information:

CorelDRAW:	X7.4, X7, X7.6, X8, 2017, 2018, 2019, 2019.2, 2020, 2021, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25
Corel DESIGNER:	X7, 2017.1, 20.1, 2019.2, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25