Using the clicked on cell to put data into another cell

[tonywatsonhelp]

Hi Everyone,

I'm looking for a macro that can add the name in column C of the active cell into Sheet "Projects" range "B11"

So for example if i click on cell H27 it would use C27
but if I click on GU15 its still C15

please help if you can.

Thanks

Tony

 

[wideboydixon]

Hi Tony,

Is this active cell on multiple sheets or just one sheet? Just wondering where to put the macro (sheet or workbook).

WBD

 

[tonywatsonhelp]

Hi wideboy,

It will be just one sheet call "Data" that I will be wanting it to work on
Also would be helpful if it only run when the click cell was between Column J and SA

Thanks

Tony

 

[wideboydixon]

OK. Right click on the "Data" tab, select "View Code..." and paste this:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Count = 1 And Target.Column >= Range("J1").Column And Target.Column <= Range("SA1").Column Then
    Sheets("Projects").Range("B11").Value = Cells(Target.Row, "C").Value
End If

End Sub

WBD

 

[tonywatsonhelp]

Brilliant, Work first time,
Thanks Very Much Wideboy

Tony