Maybe I'm doing something wrong but neither formula will do anything. I am
just slitely better than a novice at this. The original formula worked the
way I needed it to but using that formula will require 512 separate macros. I
think if you see the sheet you would understand what I am trying to do. I can
e-mail the sheet with all macros removed so you can see what I am talking
about. I have modified the original sheet to show the buttons in the same
cell as the players name to be assigned.


"Gord Dibben" wrote:

Sub findbottom_paste()
Set rng1 = ActiveSheet.Cells(Rows.Count, 1).End(xlUp) _
.Offset(1, 0)
Range("C2").Copy Destination:=rng1
End Sub

Or alternative.....................

Sub findbottom_paste()
Set rng1 = ActiveSheet.Cells(Rows.Count, 1).End(xlUp) _
.Offset(1, 0)
rng1.Value = Range("C2").Value
End Sub

Will keep moving down one cell each time you run the macro, copying C2 to
next empty cell in column A


Gord Dibben MS Excel MVP

On Fri, 19 Dec 2008 09:02:04 -0800, Gryndar
wrote:

I would like to create a macro that sends the contents of a cell to another
cell when a particular button is sellected but if that cell already has
content to then send the info to an alternate cell. *(Click on button 1 to
send contents of C2 to cell A2 but if A2 is not empty to send contents to A3)

I have used ya'll (yes I am southern) several times before for macro info
and have received great responses. Thanks a bunch in advance. MERRY
CHRISTMAS EVERYONE!