View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Rob van Gelder[_4_] Rob van Gelder[_4_] is offline
external usenet poster
 
Posts: 1,236
Default Using Workbook_SheetChange for single column

Try this:

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Sh.Name = "Sheet1" Then
If Not Intersect(Target, Columns("C")) Is Nothing Then
Beep
End If
End If
End Sub


Be aware that each Worksheet has it's own events for handling Change
So instead of receiving the Workbook event and working out which sheet it's
for, you could just receive the Worksheet event.

--
Rob van Gelder - http://www.vangelder.co.nz/excel


"Brad K." wrote in message
...
What is the simplest way to use the "Private Sub
Workbook_SheetChange(ByVal
Sh As Object, ByVal Target As Range)" for only one column? Or maybe this
isn't the choice I want to use. I want to run a macro only if data has
been
added to a cell in column "C".
Any help would be appreciated.
Thanks in advance,
Brad K