Sub movedata()
Range("c7").Cut Range("f7").insert
End Sub
or maybe this is what you want
Sub movedata()
Range("c6").Copy Range("f7")
Range("c6").ClearContents
End Sub

Signature
Don Guillett
Microsoft MVP Excel
SalesAid Software
dguillett1@austin.rr.com
> hi all i need to make a cut - insert(value) without using select command
> of
> macros..
> can u help me ?!? ty !
N+ - 01 Mar 2008 20:23 GMT
built easiest ;)
Range("A80").Value = Range("F2").Value
Range("A80").Copy
Range("A81").Insert Shift:=xlDown
with this i can move thru the sheet as usual when the macro is running..
> Sub movedata()
> Range("c7").Cut Range("f7").insert
[quoted text clipped - 8 lines]
> > macros..
> > can u help me ?!? ty !