View Single Post
 
Old September 12th, 2007, 07:03 PM
wensmail wensmail is offline
Registered User
 
Join Date: Sep 2007
Location: , , .
Posts: 1
Thanks: 0
Thanked 0 Times in 0 Posts
Default Excel VBA copy & paste

Copy and paste don’t work, except via clipboard.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.CommandBars("Cell").Reset
Dim kg As Integer
kg = "kind of great"
   If Sheets(1).[b28] = kg And IsEmpty(Sheets(1).[c28]) Then
      Sheets(1).[c28].Interior.ColorIndex = 3
   Else
      Sheets(1).[c28].Interior.ColorIndex = -4142
   End If

End Sub

How can I get the function copy and paste work again?

I'd appreciate any help in this

Thanks!