title: VBA- Why End(xlDown) will take me to the very bottom of my excel
body: <p>The assignment requires me to run the Monte Carlo result 1000 times. I already create a row of 30 years values(B5:AE5), and I want to repeat the process 1000 times. Every time, there will be a new row comes out, and all the values will be random. </p>
  
  <p>Below is my code, for some reason, it will go to the very bottom of my excel sheet. I want the second row of 30 years values inside (B6:AE6). </p>
  
  <pre><code>Sub Macros()
  Dim trail As Long
  trail = InputBox("Enter the number of time you want to simulate this Macros", "Macros", "10")
  
  For i = 1 To trail
  Application.CutCopyMode = False
  Range("B5").Select
  Range(Selection, Selection.End(xlToRight)).Select
  Selection.Copy
  Selection.End(xlDown).Select
  Selection.Offset(-1, 0).Select
  Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
         :=False, Transpose:=False
  Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
         SkipBlanks:=False, Transpose:=False
  Range("A4").Select
  Selection.End(xlDown).Select
  Selection.Copy
  Selection.Offset(1, 0).Select
  ActiveSheet.Paste
  Application.CutCopyMod = False
  Next i
  Range("B4").Select
  End Sub 
  </code></pre>
  
  <p>Thank you sooo much! </p>