Selecting multiple cells using offset

[linesite]

This officially is the first bit of functional VBA that I've managed to put together on my own to help streamline and edit a spreadsheet. My idea was paste data in another row and select three cells two rows down and nine columns to the left and start the process over. This code works fine; however, I can't program code with offset to select more than one cell on the same row (last line of code). What can I add to this row of code to get offset to select three consecutive cells on the same row to start editing process over?

Sub MoveRowData()

' MoveRowData Macro
' Keyboard Shortcut: Ctrl+Shift+R

ActiveCell.Activate
Selection.Cut

ActiveCell.Offset(-1, 9).Select
ActiveSheet.Paste

ActiveCell.Offset(3, -9).Select

End Sub

 

[Joe4]

Do you mean something like this?

    Range(ActiveCell.Offset(3, -9), ActiveCell.Offset(3, -6)).Select

 

[linesite]

Joe thank you for the information--line of code works perfectly.