Clear content in a dependent cell when new selection is made

[JLHSolutions]

Hello,

I have just started using Excel to track the status of our jobs. I am still learning how to do things using Excel as I came from using FileMaker. What I have right now is a List that gives me choices for the status of the job. This is in column H. In column J, I have a value list that changes depending on what is selected in column H. This part works great.

What I am trying to do is to clear the selection in Column J when the selection changes in column H. From what I can gather on Google, I need to use VB script, but I haven't been able to figure out what to use to write this code. I only want it to change the value in the current row as I am using each row for the a different job. I will have many rows visible at one time as we have lots of jobs that are in various stages.

I am hoping someone here can help me with this. I don't think its too difficult, but as I am new to doing this type of stuff in Excel, I am stumbling around trying to figure it out.

Thanks in advance.

 

[JLHSolutions]

When I try to filter the rows using the filters up in the column heading.

 

[mumps]

Strange! Using the file you uploaded, I just tried filtering on the headers in row 8 without any problems. Do you have any other macros in the workbook?

 

[JLHSolutions]

Here is the link to the new file with the VB code in it. https://www.dropbox.com/s/7e80l1jj9ijaraa/JOB LIST.xlsm?dl=0

When I try to filter, it works a couple of times and then stops. If I try to delete a row, it gives me the error.

Also, I noticed that I do not have the ability to undo something. Not sure why this feature is not available.

 

[mumps]

The macro below should take care of the error problem when deleting a row. I tried filtering several times without any problems. Also, you should be aware that you cannot "Undo" any action performed by a macro.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("H:H")) Is Nothing Then Exit Sub
    On Error GoTo errHandler
    Application.EnableEvents = False
    Target.Offset(0, 2).ClearContents
errHandler:
    Application.EnableEvents = True
End Sub

 

[JLHSolutions]

Thank you for all your help! I tried that and so far so good! I've been using it a little yesterday and today. No errors so far.

 

[mumps]

My pleasure.