title: If statement to paste values in VBA
body: <p>I am NEW to VBA and need some help.  I am trying to write something that will look in  my sheet named 'ROLLUP' and if cell H5 contains the letters "jan", then I would like to paste the <strong>values</strong> from sheet named 'Project" cells I97:I102 in sheet named "Detail" cells H38:H43.  The following is my code and nothing happens.  Any help?</p>
  
  <pre><code>Option Explicit
  
  Private Sub ETC_pop()
  
  month = Worksheets("ROLLUP").Range("H5")
  
  If ws.Name = "Detail" Then
  If InStr(month, ("Jan")) &gt; 0 Then
      Worksheets("Detail").Range("H38:H43").Value = Worksheets("Project").Range("I97:I102").Value
    End If
  End If
  
  End Sub    
  </code></pre>