Incrementing Cell Reference

[cntrlmn]

I have a spreadsheet that I'm using to capture serial data from a weigh scale using a opc server with dde. My scale value is updated in A1 when the enter button is pressed on the scale and the after every update I have created a counter that increments the number of updated values I have received. All I need is a way to increment the cell reference so that the updated value is placed starting in cell B1 then after the next update cell B2 and so on. I have all of the logic working except I cannot determine what function or method to use to calculate the cell reference. I plan on using the incremented to place the value in example if weight is 100.2 and update counter is 18 then 100.2 is placed in B18. I'm using a vb macro. I just need the bit of code for the cell reference. Its probally easy I'm just not very familiar with excel.

 

[VoG]

Is it?

Range("B" & Rows.Count).End(xlUp).Offset(1).Value = Range("A1").Value

 

[cntrlmn]

Thanks so much, I've been working on the solution for this for over 2 days and in 30 seconds you have solved it for me.