Hi Bruce,

Try assigning the following code to a button:

'=============
Public Sub Tester()
Dim rng As Range

Set rng = Range("DataEntry") '<<==== CHANGE

rng.ClearContents

End Sub
'<<=============


---
Regards,
Norman


"Bruce" wrote in message
...
Is there a form button I can use to reset data entry cells to nothing?

TIA
Bruce