VBA Code to multiply column by value

Hello,

I am a little stuck on why this won't work. I copied values from one sheet to another. Now, on the new sheet, I'd like to multiply one particular column by 1000. However, the multiplication is not updating.

Private Sub GetRawData_Click()
  
 With Sheets("Raw Data")
    .Range("A11", .Range("A" & Rows.Count).End(xlUp)).Copy ActiveSheet.Range("A12")
    .Range("B11", .Range("B" & Rows.Count).End(xlUp)).Copy ActiveSheet.Range("B12")
    .Range("E11", .Range("E" & Rows.Count).End(xlUp)).Copy ActiveSheet.Range("C12")
    .Range("F11", .Range("F" & Rows.Count).End(xlUp)).Copy ActiveSheet.Range("D12")
    .Range("H11", .Range("H" & Rows.Count).End(xlUp)).Copy ActiveSheet.Range("E12")
    
    End With

    Dim i As Integer
    Dim c As Integer
    
    i = Application.CountA(Range("B12"))
    
    For c = 12 To i
        Cells(c, B) = Cells(c, B) * 1000
    Next c
  
  
End Sub

Okay, I made those corrections. For i, I set it equal to a cell. Because the first column represents the test number, I used that to represent the last row. I know this is not the most efficient way. It works now actually.

Dim i As Integer
    i = Cells(4, "I")
 
    'Counter for Ron
     Dim r As Integer
 
     For r = 12 To i
      Cells(r, 2) = Cells(r, 2) * 1000
      Next r

Awesome, that line worked! I guess it is resolved now. Thanks!