title: VBA clear cells adjacent to the column if it is empty
body: <p>I have 5 columns. If column 3 has no value, I want all other adjacent cells (column 1,2,4,5) to clear.
  I got this from another site:</p>
  
  <pre><code>    Sub ClearCust()
  'Clears data in column if there is no Amt number next to it.
  'Used in conjunction to fill blanks.
  Dim j As Range
  For Each j In Workbooks("OH Details_v1").Worksheets("Sheet1").Range("C2:D" &amp; Worksheets("Sheet1").Range("a65536").End(xlUp).Row)
      If j.Value = 0 Then
          j.Offset(0, 1).ClearContents
      End If
  Next j
  </code></pre>
  
  <p>End Sub</p>
  
  <p>But it only clears column C, D, E...</p>