need help with this script

[chriswrcg]

I have created a document and added a button with this macro script attached.
currently this works great and does exactly what i wanted it to do but I am having trouble changing it. Thank you Dflak and DannyJ for helping me get to here.
Right now it creates the time stamps in column A. I need to be able to change it to write the results in another column. This will allow me to create more buttons and have each post to a different column. I have tried everything i know and can not make it work. Any help would be apreciated.


Sub InputTime()

Dim emptyRow As Long 'emptyRow is used instead of a row number

emptyRow = WorksheetFunction.CountA(Range("A:A")) + 1 'Defines empty row as first empty row in a column (In this case Column A)

Sheets("Sheet1").Cells(emptyRow, 1).Value = Now()


Sheets("Sheet1").Cells(emptyRow, 1).NumberFormat = "h:mm:ss;@"



End Sub

[rcm]

Could you be more specfic? please include a sample of what you desire.

[mahju]

Change the colored number to the desired No. of column

Sheets("Sheet1").Cells(emptyRow, 1).Value = Now()


Sheets("Sheet1").Cells(emptyRow, 1).NumberFormat = "h:mm:ss;@"

[chriswrcg]

yes,
Right now there is a button on the sheet
every time you click it it displays the time. The first time in A1, then A2, then A3,A4,A5 and so on. each time you click it, the time is displayed in the cell just under the last cell that the time was displayed.
What I want to do is be able to have button one populate column a, button 2 to populate column c or whatever.

The best way to do this is to copy each button but modify the code and change where the information will be displayed. I have tried modifing the above code every way I can think of but all I am getting is an error message. I need help changing the code so that I can easily change were the information is populated.

see the attached file.