Automatically Change Font Size On Selection

Hi there

I use this ok code to increase the font in the selected cell :

'Increase the Selected Cell Font


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim TargetRange As Range
    Dim isect


    Set TargetRange = Range("C:D")
    Set isect = Intersect(Target, TargetRange)


    If Not isect Is Nothing Then
        Columns("C:D").Font.Size = 11
        Target.Font.Size = 15
        Exit Sub
    End If


    Columns("C:D").Font.Size = 11


End Sub

The problem is when i press ctrl+c to copy a cell content, so once i move the curser to the distenation cell then the copying mode in selected cell disappeared.

It is because when the event is trigered then the copying mode stops.

The question is : how to let the copying mode works even when the event is trigered ?

Re: Automatically Change Font Size On Selection

Thanks for reply
but it did not work the way you suggest

when this line

Columns("C:D").Font.Size = 11

is excuted then the copying mode stops.................so I have to stop this line from excuting which I donot want to, but his is the only solution infront of me so far.......

any help on the point, pls............?

Re: Automatically Change Font Size On Selection

thank you