Cuts the specified range and either moves it to the Clipboard or pastes it into a specified destination range.
expression.Cut(Destination)
expression An expression that returns a Range object.
Destination Optional Variant. If you do not specify this argument, the specified range is sent to the Clipboard. If this argument is a Range object, the source range is moved to the specified range.
Example
This example moves the formula, data, and formatting from cell A3 to cell G7 on the active worksheet.
Sub MoveCell()
Dim shtSource
Set shtSource = Spreadsheet1.ActiveSheet
' Move the contents of cell A3 to cell G7.
shtSource.Range("A3").Cut shtSource.Range("G7")
End Sub