title: How to specify a range that is a specific row and specific columns?
body: <p>I search Column A for a specific value. I want copy the row, that contains the value, from columns C to O, to another sheet.</p>
  
  <p>The worksheet labeled Data is where I am pulling information from columns C to O.</p>
  
  <p>The worksheet labeled Sales is where I want the data pasted.</p>
  
  <pre><code>Sub Test_Copy_Data()
      'Macro to copy sales based on site
  
      '**********************************************************
      Dim numentries As Integer
      Dim i As Integer
      Dim site As String
  
      '***********************************************************
      'Define sheet names
      Data = "Data1"
      Sales = "Sales"
  
      '************************************************************
      'Get number of entries and desired scores
      numentries = Worksheets(Data).UsedRange.Rows.Count
  
      '*************************************************************
  
      site = Worksheets(Sales).Range("B1").Value
  
      '************************************************************
  
      'Run loop to cycle through all entries (rows) to copy
  
      For i = 1 To numentries
          If (Worksheets(Data).Cells(i + 2, 1).Value = site) Then
              Worksheets(Data).Range("C:O" &amp; i + 2).Copy _
                Destination:=Worksheets(Sales).Range("A2")     
          End If
      Next i
  
  End Sub
  </code></pre>