I have made the following routine to go to the right side of some rows and copy the right most cells and paste it to the right of the formerlly right most cells. I now want to add a routine that will take the selection back to the first cell that I have just added. Thanks!
Sub addmonth()
Range("t7").End(xlToRight).Select
Selection.Copy
ActiveCell.Offset(0, 1).Select
ActiveCell.PasteSpecial
Range("t8").End(xlToRight).Select
Selection.Copy
ActiveCell.Offset(0, 1).Select
ActiveCell.PasteSpecial
Range("t9").End(xlToRight).Select
Selection.Copy
ActiveCell.Offset(0, 1).Select
ActiveCell.PasteSpecial
Range("t11").End(xlToRight).Select
Selection.Copy
ActiveCell.Offset(0, 1).Select
ActiveCell.PasteSpecial
End Sub
Sub addmonth()
Range("t7").End(xlToRight).Select
Selection.Copy
ActiveCell.Offset(0, 1).Select
ActiveCell.PasteSpecial
Range("t8").End(xlToRight).Select
Selection.Copy
ActiveCell.Offset(0, 1).Select
ActiveCell.PasteSpecial
Range("t9").End(xlToRight).Select
Selection.Copy
ActiveCell.Offset(0, 1).Select
ActiveCell.PasteSpecial
Range("t11").End(xlToRight).Select
Selection.Copy
ActiveCell.Offset(0, 1).Select
ActiveCell.PasteSpecial
End Sub