[annannienann]

I am writing an Invoice system for a client in Excel and its VB. I have run across a problem:

The system needs to copy the content of one text box to another. It also needs to preserve the formatting e.g. the bit in bold. I have the code that copies the content across:

Sub Copy()
Worksheets("Invoice (2)").TextBoxes("P2 1").Text = Worksheets("Invoice").TextBoxes("P1 1").Text
End Sub


But the code does not copy the formatting. Could someone please provide me with an example of the could or a suggest on how this could be done.

I have also attached the Excel sheet as this may help solve the problem.

Thank you. Peter

PS. Does anyone know how to link text boxes in Excel e.g. when you have filled a text box with text it automatically carries on in a new text box.