Advertisement
Guest User

Untitled

a guest
Dec 2nd, 2016
63
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.13 KB | None | 0 0
  1. Sub dd()
  2. For i = 1 To 20
  3. If Cells(i, 3).Value <> "Deal" Or "Meal" Or "Run" Then
  4. Cells(i, 20).ClearContents
  5. End If
  6. Next i
  7. End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement