title: Compilation error when calling a Sub by a button click
body: <p>I'm trying execute this code when a button is pressed in the sheet,
  but I receive this error :</p>
  
  <blockquote>
    <p>Call Worksheet_Change -> Compilation error - The argument is not optional</p>
  </blockquote>
  
  <pre><code>Sub Worksheet_Change(ByVal Target As Range)
  Set MyPlage = Range("A1:I1200")
  For Each cell In MyPlage
  Select Case cell.Value
  Case Is = "OK"
  cell.EntireRow.Interior.ColorIndex = 43
  Case Is = "NOTOK"
  cell.EntireRow.Interior.ColorIndex = 3
  Case Is = "P"
  cell.EntireRow.Interior.ColorIndex = 6
  Case Else
  cell.EntireRow.Interior.ColorIndex = xlNone
  End Select
  Next
  End Sub
  
  Private Sub CommandButton1_Click()
  Call Worksheet_Change
  End Sub
  </code></pre>