View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.misc
JLatham JLatham is offline
external usenet poster
 
Posts: 3,365
Default Validation Cell Macro

Here is a skeleton to permit you what to do. The phrases after Case Is =
must each be exactly as they would appear in your column H entries.

Private Sub Worksheet_Change(ByVal Target As Range)
'need help getting this code into your worksheet?
' http://www.jlathamsite.com/Teach/WorksheetCode.htm
' to contact author
'
If Target.Column < 8 Then
'not in column H (A=1, B=2...H=8...Z=26, etc)
Exit Sub
End If
Application.EnableEvents = False
Select Case Target.Value
Case Is = "Order Short"
'code to execute here or
'call to macro with code to deal
'with Short orders
Case Is = "Order Long"
'code to execute here or
'call to macro with code to deal
'with overages
Case Else ' all not covered above
'do nothing, just leave
'empty of commands
End Select
Application.EnableEvents = True
End Sub


"MESTRELLA29" wrote:

I have a List where we are updating the material received to our stock,
The list contais a coulum with validation cell where we input ( Order Short,
Order Complete)

i want the macro to activate when each cell in the coulum changes,

Example,

If cell H2 is updated Order complete "do nothing"
if cell h3 is updated Order Short "Run Macro"


Thanks