title: VBA code to Multiply all the elements of column "B"in Sheet 1 with a value in cell A1 of sheet 2 and print the result in Column C
body: <p>In a worrkbook I have two tabs, Sheet1 and Sheet2, I want to multiply all the numbers in column B of sheet1 with a value in cell A1 of sheet 2.</p>
  
  <p>Can anyone please help me with the VBA code, I am new to VBA. This is what I've tried :-</p>
  
  <pre><code>Sub Macro1()
  ActiveCell.FormulaR1C1 = "=RC[-1]*Sheet2!R[-1]C[-2]"
      Range("B2").Select
      Selection.End(xlDown).Select
      Range("C10").Select
      Range(Selection, Selection.End(xlUp)).Select
      Selection.FillDown
      Range("C10").Select
      Range(Selection, Selection.End(xlUp)).Select
      Range(Selection, Selection.End(xlToLeft)).Select
      Selection.Copy
      Range("A10").Select
      Selection.End(xlUp).Select
      Application.CutCopyMode = False
  End Sub
  </code></pre>