I have a macro as follows:
Sub Macro2()
ActiveCell.Offset(-1, 0).Range("A1").Select
Selection.Hyperlinks.Delete
Selection.Cut
ActiveCell.Offset(-1, 1).Range("A1").Select
ActiveSheet.Paste
ActiveCell.Offset(1, 0).Rows("1:2").EntireRow.Select
Selection.Delete Shift:=xlUp
ActiveCell.Offset(2, 0).Range("A1").Select
End Sub

It selects the above cell. Remove the hyperlink, moves it to top-right
cell, selects two rows and delete them and sits in the two rows below
same cell as started and ready to do this task again. I have many lins
to do this task and if I want to repeat the macro for each loop it
takes long long time. I want Macro to do all for me.
I want to put this Macro in a loop to do these tasks as long as there
is a row below and stops when it reaches the last row.
How can I make the loop in this macro?
TIA, Rasoul Khoshravan