Hi,
I've had a look around the previous posts and couldn't find an answer to this problem, so was hoping someone could help?
I've got three columns of numbers, A, B and C, and i am wanting to change the values of the numbers in columns A and C, if certain criteria are met in column A. I'm not interested in the original values of A and C. I'm pretty new to VBA, and the code i've written is below. If anyone can help i'd be most gratefull.
----------------------------
Cells(1, 1).Select
For i = 2 To 65536
If Cells(i, 1) >= RiffLoc Then
ActiveCell.Value = (ActiveCell.Value + RiffLength)
ActiveCell.Offset(0, 2).Select
ActiveCell.Value = (ActiveCell.Value - RiffHeight)
ActiveCell.Offset(0, -2).Select
End If
Next i
-----------------------------------------------------
Hope this post contains makes sense and contans enough info..
Thanks in advance,
Dave
I've had a look around the previous posts and couldn't find an answer to this problem, so was hoping someone could help?
I've got three columns of numbers, A, B and C, and i am wanting to change the values of the numbers in columns A and C, if certain criteria are met in column A. I'm not interested in the original values of A and C. I'm pretty new to VBA, and the code i've written is below. If anyone can help i'd be most gratefull.
----------------------------
Cells(1, 1).Select
For i = 2 To 65536
If Cells(i, 1) >= RiffLoc Then
ActiveCell.Value = (ActiveCell.Value + RiffLength)
ActiveCell.Offset(0, 2).Select
ActiveCell.Value = (ActiveCell.Value - RiffHeight)
ActiveCell.Offset(0, -2).Select
End If
Next i
-----------------------------------------------------
Hope this post contains makes sense and contans enough info..
Thanks in advance,
Dave