Formatting information with a specified status

[DEL]

Hi! I am working on a word template which contains tables and text that decribe each item. The item also has a status which can be work, in analysis, rejected etc. I need to format in light grey the whole Information and table that has "rejected" status and delete the other statuses(I only need the rejected status to be shown in the document). I am a newbie in VBA and really need your help. How can I navigate through the tables and format only the section regarding the "rejected" status?

[macropod]

Assuming the data you want to work on are in the tables, you could use a macro like:

Sub Demo()
Application.ScreenUpdating = False
Dim Tbl As Table, r As Long
For Each Tbl In ActiveDocument.Tables
  With Tbl
    .Shading.BackgroundPatternColorIndex = wdGray25
    For r = .Rows.Count To 2 Step -1
      If Split(.Cell(r, 1).Range.Text)(0) = "rejected" Then .Rows(r).Delete
    Next
  End With
Next
Application.ScreenUpdating = True
End Sub