How to copy the value of a cell I click to the current active cell

Looking to create an Employee schedule template that will allow the user to select shifts at the top of the excel sheet, that will intern automatically populate the active cell with the chosen (clicked on) shift.

Example:
If I am currently in cell C24, then click on the schedule shift of '8AM-6PM' in cell A1, the shift of '8AM-6PM' will copy to cell C24.

Not sure if I need to use/create BUTTONS or if this can be accomplished another way. And if I need to use BUTTONS, how would I achieve this functionality?

Any help is greatly appreciated.

Use a sheet specific macro.

Probably the best option is to use the right click event.

Ok.

You need three macros to achieve this.

An auto open macro

and two sheet specific macros.
right click on the sheet name at the bottom of excel and select view code to ammend the sheet specific macros.

Please Login or Register  to view this content.

@mehmetcik,
Can't thank you enough for taking the time to respond with a Solution. I wish I understood the code, so I could better plan out the entire sheet. I'll play with the sheet a bit more and see if it works for my purpose as-is. I'll let you now! Again, thank you very much!

Can I assume "Target.Cells" are the cells where I would list the schedule shifts I need?

Target.Cells.Count > 1
Or Target.Cells.Row > 1 (Is this Row 1?)
Or Target.Cells.Column > 3 (is this Column C?)
Then GoTo 200 (What is this?)

Example:
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
If Target.Cells.Count > 1 Or Target.Cells.Row > 1 Or Target.Cells.Column > 3 Then GoTo 200
Range(LastCell).Value = Target.Value
200 Cancel = True
End Sub

Another question...

Can I use something other than RightClick? I seem to use the Right click for a lot of other functions, and I'd hate to lose that functionality. Thanks.

This version uses a double click.

Please Login or Register  to view this content.

I like it. I also added a CheckBox to allow toggling the DoubleClick functionality on and off.

Like this:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Use a checkbox to toggle on/off the DoubleClick functionality
If CheckBox1.Value = False Then Exit Sub
'Predefined schedule times should be located within A1:J3 only
If Target.Cells.Count > 1 Or Target.Cells.Row > 3 Or Target.Cells.Column > 10 Then GoTo 200
Range(LastCell).Value = Target.Value
200 Cancel = True
End Sub

Last question... I think.

How would I make the next cell selection move to the cell to the right?
Example, If the active cell is E4, then I DoubleClick A1 to add the contents of that cell to E4, how do I automatically make the next active cell F4 (move one to the right from the original active cell)?

Insert this line before line 200

Please Login or Register  to view this content.

Thanks, mehmetcik... I actually tried that already, it moves one cell over from where you DoubleClick, but not from the previously active cell. I want the user to be able to fill in the next field (to the right) without having to click on it before DoubleClicking the hours selection above. I hope that makes sense. T

My apologies.

Please Login or Register  to view this content.

That's beautiful!!! Can't thank you enough.