Sub moveactivecell()
ActiveCell.Cut ActiveCell.Offset(, -1)
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Paul Bond" wrote in message
...
What command should I use in an Excel visual basic macro to move the
current
cell to the left by 1