Paste not a Worksheet_Change event?

D

Dan R.

Shouldn't this fire when values are pasted onto the sheet? That is a
change event correct?

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("A2:A1000")) Is Nothing Then
With Range("A2:A1000").Font
.Name = "Arial"
.Size = 8
End With
End If
End Sub

Thanks,
-- Dan
 
D

Dave Peterson

It should if events are enabled.

You sure you didn't turn them off and forget to turn them back on.

You could turn them on in the VBE's immediate window.
type this and hit enter:

application.enableevents = true

Then test it.

I'd even add a line before the "if" statement.

msgbox "made it"

just for testing.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top