Text boxes

A

AAK

How do I merge three text boxes together into one so it is
easier to copy and paste?
 
D

Doug Robbins - Word MVP

Hi Aaron,

Use

Dim i As Integer, mystring As String
mystring = ""
For i = 1 To ActiveDocument.Shapes.Count
mystring = mystring & ActiveDocument.Shapes(i).TextFrame.TextRange.Text
Next i
ActiveDocument.Shapes(1).TextFrame.TextRange.Text = mystring

Please respond to the newsgroups for the benefit of others who may be
interested.

Hope this helps
Doug Robbins - Word MVP
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Clearing combo boxes and a text box 2
Creating a Search using a combo box and then creating a report. 4
Content Control Box Issue - Please Help! 0
Link a text box based on drop down box with four options MS Word 365 0
How to disable synchronization of text boxes. 0
Auto Populate One Pages from spreadsheet 0
Generated text copies into another template 0
Centered text that does not stay centered 0

Top