...and deleting the text box
is there a simple way without difficult procedure codes ? MY VBA version is 7.1
This is one of my questions on my previous post in reformatting pages on adding page numbers.
tanks in advance once again
...and deleting the text box
is there a simple way without difficult procedure codes ? MY VBA version is 7.1
This is one of my questions on my previous post in reformatting pages on adding page numbers.
tanks in advance once again
Maybe something like the following will work with a selected floating text boxThe problem however is that the text box will have been used to format the document in a particular way, which will be lost.Sub Macro1() Dim sText As String Dim oRng As Range Set oRng = Selection.ShapeRange.TextFrame.TextRange sText = oRng.Text Set oRng = Selection.ShapeRange.ConvertToInlineShape.Range oRng.Text = sText Set oRng = Nothing End Sub
Graham Mayor - MS MVP (Word) 2002-2019
Visit my web site for more programming tips and ready made processes
http://www.gmayor.com