Thread: [Solved] Need help on Macro 03- Find text - if text is blank then remove line
View Single Post
 
Old 02-11-2011, 08:22 AM
simpleonline1234 simpleonline1234 is offline Windows XP Office 2003
Novice
  
Join Date: Feb 2011
Posts: 1
simpleonline1234 is on a distinguished road
Default Need help on Macro 03- Find text - if text is blank then remove line
I have a macro that I am working on right now and it daunting.

I need to be able to find text on the document and if the value next to the word is blank then delete the entire line and move the next line up.

This is what I have coded so far but it doesn't do anything

any ideas on how to get this one working?

Thanks


Code:
Dim RemoveLines As Field
For Each RemoveLines In ActiveDocument.Fields
  If RemoveLines.Type = wdFieldCharacter Then
   
  End If
Next RemoveLines
Reply With Quote