Delete data in a single cell

[ndfightingirish1971]

I have what should be a simple problem but I have been racking my brain trying to figure out what I am doing wrong. I collect data using a wireless device that sends a signal to the PC and thus into Excel. Once the number is populated into a cell, it automatically moves to the next cell to the right (in my case, I have the move direction set to right). If the operator makes a mistake collecting the data, I created a button to allow them to go back one cell, delete the data, and retake the data. The problem with my code is that it does not delete the data. Can anyone please help me? Thanks!

Code:
Sub RETAKE_POINT()
SendKeys "+{Tab}"
Selection.ClearContents
End Sub

 

[ranman256]

activecell.value = ""

 

[ndfightingirish1971]

Thanks ranman256... I tried that and a couple other things and nothing seems to work. I modified the code to read:

SendKeys "+{Tab}"
ActiveCell.Select
Selection.ClearContents

-and-

SendKeys "+{Tab}"
ActiveCell.Value = ""


Obviously, I am an amateur in most VBA coding but this should be pretty straight forward. I thought my Excel file might be corrupt so I tried the different versions of the code on a different PC with a brand new Excel file and got the same results. It's strange because the sendkeys portion works perfectly but once it moves to the previous cell, the previous (incorrect) data will not go away. Thanks again!