How do I create a button to enter a number in a cell and then tab/enter to next cell

I need to create a button with a macro that every time you click on it will enter a number 1 into a cell and then tab to the next cell. When you click on it again it will enter a 1 in the new cell and then tab to the next one. And so on.....