Shift cells from multiple rows after deleting

[ctasich]

Is it possible to shift cells from different rows after deleting a cell(s)? For example, say I have the follow table:

x x x x x x
x x x x x x
x x x x x x

I want to delete the first three entries...

x x x
x x x x x x
x x x x x x

When I do this I would like all the cells to shift accordingly as such:

x x x x x x
x x x x x x
x x x

Is this possible? Maybe a macro would help?

Thanks for any help!

[ExcelIsEasy]

I hope it will help:

Sub Shift_Cells()
'
' Shift_Cells Macro
'

'
Range("D1:F1").Select
Selection.ClearContents
Range("D2:F3").Select
Selection.Cut
Range("D1").Select
ActiveSheet.Paste
End Sub

Tutorial here: VBA Range

[ExcelIsEasy]

duplicate, sorry