wrightyrx7
Well-known Member
- Joined
- Sep 15, 2011
- Messages
- 994
HI all,
I have the following code but do not know how to put the formula in:-
The formula i want to use is:
my attempt at putting it into VBA is:
Please help
I have the following code but do not know how to put the formula in:-
The formula i want to use is:
Code:
=IF(A3=A2,IF(B3=B2,G2+1,1),1)
my attempt at putting it into VBA is:
Code:
Sub test() Dim lastRow As Integer
Dim rngSeq As Range
Dim i As Range
lastRow = Range("A3").End(xlDown).Row
With ActiveSheet
Set rngSeq = Range("M3:M" & lastRow)
For Each i In rngSeq.Cells
i.Formula = "=if(A" & .Row = A" & .Row - 1,
Next i
End With
End Sub
Please help