Deleting specific rows in Mail Merge document based on data in cells

[Rundgren]

Hi everyone,

I'm hoping someone can help me with a problem I'm having with a mail merge document. I've created a mail merge document that pulls data from an excel sheet to generate approximately 300 monthly invoices.



What I need help with is writing a macro that after doing the merge it looks at the three highlighted cells (Interest Adjustment/Tax Reserve/Fees) and if they show a balance of $0.00 then the row(s) are deleted.

I'm not very familiar with macros, so I would appreciate any guidance or suggestions on how to achieve this.

Thank you in advance for your help.

[macropod]

You could, for example, add the following macro to your mailmerge main document, then save it in the .docm format before running the mailmerge.

Sub MailMergeToDoc()
Application.ScreenUpdating = False
Dim t as long, r As Long
ActiveDocument.MailMerge.Execute
With ActiveDocument
  For t = .Tables.Count to 2 Step - 2
    With .Tables(t)
      For r = 5 To 2 Step -1
        Select Case r
          Case 5, 4, 2
            If Split(.Cell(r, 2).Range.Text, vbCr)(0) = "$0.00" Then
                .Rows(r).Delete
              Next
            End If
        End Select
      Next
    End With
  Next
End With
Application.ScreenUpdating = False
End Sub

For PC macro installation & usage instructions, see: Installing Macros
For Mac macro installation & usage instructions, see: https://wordmvp.com/Mac/InstallMacro.html