Dear Chande, Sorry for the confusion. Use the following code, It will work.
However there is a small drawback, you have to paste it in the sheet where you want to activate it. It will not work for any other sheet. Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) Dim Txt As String If ActiveCell.Locked = True Then MsgBox "this cell is locked" End Else MsgBox "this cell is not locked" ActiveCell.Copy End If End Sub Please let me know if it helps. Regards, Andy On Thu, May 21, 2009 at 5:07 PM, DOLLAR CHANDE <dollarcha...@gmail.com>wrote: > Dear Andy, > > Thx a lot for your kind help, I copied the code and pasted it in the > sheet...but i m unable to copy the cell content when i click one. > However being a novice, pls advice me if i need to do something to make > that macro run....... > > Thx $ Chande > > On Thu, May 21, 2009 at 3:12 PM, Aindril De <aind...@gmail.com> wrote: > >> Dear Chande, >> >> Please use the following code. >> >> Sub putclp() >> Dim Txt As String >> If ActiveCell.Locked = True Then >> MsgBox "this cell is locked" >> End >> Else >> MsgBox "this cell is not locked" >> ActiveCell.Copy >> End If >> End Sub >> >> Please let me know if it helps. >> >> Regards, >> Andy >> >> On Thu, May 21, 2009 at 1:54 PM, DOLLAR CHANDE <dollarcha...@gmail.com>wrote: >> >>> Dear Group, >>> >>> I have a Workbook where I want a macro such that if i click any unlocked >>> cell in any sheet or a particular sheet, all the contents of the said cell >>> should be copied and be ready to paste wherever i want. >>> >>> Hope i will b able to get the macro as nobody on this group is left >>> unanswered. >>> >>> Thx to all, >>> >>> $ Chande >>> >>> >>> >> >> >> > > > > --~--~---------~--~----~------------~-------~--~----~ ------------------------------------------------------------------------------------- Some important links for excel users: 1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at http://www.excelitems.com 2. Excel tutorials at http://www.excel-macros.blogspot.com 3. Learn VBA Macros at http://www.vbamacros.blogspot.com 4. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com If you find any spam message in the group, please send an email to: Ayush Jain @ jainayus...@gmail.com or Ashish Jain @ 26may.1...@gmail.com ------------------------------------------------------------------------------------- -~----------~----~----~----~------~----~------~--~---