Hi,

I have 3 paragraphs in a table cell. Each paragraph separated by a blank
line. I'd like to delete the blank line so that all paragraphs aren't
separated anymore.

Example:
line1 sentences paragraph

line2 sentences paragraph

line3 sentences paragraph

Wanted:
line1 sentences paragraph
line2 sentences paragraph
line3 sentences paragraph

Code so far:
   For tblIdx = 1 To ActiveDocument.Tables.Count
       Set theTable = ActiveDocument.Tables(tblIdx)

       If Mid(theTable.Cell(2, 2).Range.Text, 1, 23) = "Scenario and
Conditions" Then
           With Selection.Find
               .Text = "^p"
               .Replacement.Text = ""
               .Forward = True
               .Wrap = wdFindContinue
               .Format = False
               .MatchCase = False
               .MatchWholeWord = False
               .MatchWildcards = False
               .MatchSoundsLike = False
               .MatchAllWordForms = False
           End With
           Selection.Find.Execute Replace:=wdReplaceAll
       End If
   Next

Would anyone know how to delete the blank lines in all of table cells?

Please help me! Thank you so muchh...
John