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
-------------------------------------------------------------------------------------
-~----------~----~----~----~------~----~------~--~---

Reply via email to