Hi Håkan
I can not see any errors in your code, so I can not answer why it does not work. Your code works fine with my Excel.
I'm working with Excel 2016 and your code will look like this with a little optimization:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Column = 3 And Target.Row > 5 Then
Application.EnableEvents = False 'So it don't run twice
Cells(Target.Row, Target.Column + 2) = "Yes"
Application.EnableEvents = True
End If
End Sub
Best regards
Michael
--
You received this message because you are subscribed to the Google Groups "excel vba" group.
To unsubscribe from this group and stop receiving emails from it, send an email to
excel-vba+...@googlegroups.com.
To post to this group, send email to
exce...@googlegroups.com.
Visit this group at https://groups.google.com/group/excel-vba.
For more options, visit https://groups.google.com/d/optout.