Macro to maintain formatting OR to delete all text (excluding comments)

jimmy12 · #1 05-15-2021, 12:58 AM

Hi both,

Thanks. I really appreciate your support.

I tried both options, but they didn't seem to work. @Macropod, the debugger flagged an issue at:

.Cells(1).Range.Text = DocSrc.Comments(n).Scope.Information(wdActiveEndPa geNumber)

macropod · #2 05-15-2021, 01:05 AM

Quote:

Originally Posted by jimmy12

@Macropod, the debugger flagged an issue at:

.Cells(1).Range.Text = DocSrc.Comments(n).Scope.Information(wdActiveEndPa geNumber)

That line is essentially what you already had:
.Cells(1).Range.Text = _
oDoc.Comments(n).Scope.Information(wdActiveEndPage Number)

Code corrected.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
VBA macro to change author name in tagged comments, then delete the tags	mjt	Word VBA	0	01-28-2021 08:48 AM
Macro to highlight and bolden specific text in Word Comments	PCUSER	Word VBA	1	09-22-2020 03:08 PM
Formula to delete but maintain counts after the maximum has been reached	wheddingsjr	Excel	2	01-03-2018 01:49 PM
Form won't maintain formatting	SBrant	Word	0	02-10-2011 10:29 AM
Maintain formatting while copying text from word, and pasting into a webpage.	kdogg121	Word	1	07-07-2009 02:50 AM