Thanks i got the code to work
Code:wbkNew.Sheets(1).Range("L3").Activate 'DOMAIN_NAME For i = 1 To wbkNew.Sheets(1).Range("A1").End(xlDown).Row - 2 ActiveCell.Value = "GRK" ActiveCell.Offset(1).Activate Next i wbkNew.Sheets(1).Range("A1").Activate
Thanks i got the code to work
Code:wbkNew.Sheets(1).Range("L3").Activate 'DOMAIN_NAME For i = 1 To wbkNew.Sheets(1).Range("A1").End(xlDown).Row - 2 ActiveCell.Value = "GRK" ActiveCell.Offset(1).Activate Next i wbkNew.Sheets(1).Range("A1").Activate
Bookmarks