After pasting, you could delete every button on the myDest sheet by using the
Buttons collection:

For Each b In ThisWorkbook.Worksheets("myDest").Buttons
b.Delete
Next b

Regards
Ben


"Patti" wrote:

I need to cut data from one sheet and paste it to another. The column
numbers always remain the same, but the number of rows will vary. The
following works, but the problem is that there is a command button in the
range (on sheet "test") that I do not want to be included in the cut/paste.

Is there a way to exclude it? For the data, I need to both the values and
the formatting.

TIA,

Patti

Sub cutNpaste()
' works, but includes command button imbedded on sheet "test"
With Sheets("test")
Range("a:o").EntireColumn.Cut _
Destination:=Sheets("myDest").Range("a1")
End With

End Sub