Move text data including detailed formatting

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hello,
Can anyone help with the following:

I want to move some text data from one worksheet to another. Some of the
text entries are partially formatted (i.e., the font of only some characters
in the cell is bold, or in color, etc).

I've tried to use the Characters property, but I don't know how to read the
(start, length) values and the rest of the font properties from the source
cell.

In advance thank you!

Adrian, Ottawa
 
The best way is copy/paste:

Sub movit()
Set r1 = Sheets("Sheet1").Range("A1")
Set r2 = Sheets("Sheet2").Range("A2")
r1.Copy r2
End Sub
 
Back
Top