Delete validation input comment in last row column D on Workbook_Close

[Ironman]

Hi

I would like to clear the validation input comment in Col D of the last row in Sheet 'Training Log' when the workbook closes and I can't get the code right.

If this can only be done by clearing the validation completely by using Validation.Delete then that's fine, I'd still appreciate that as an alternative.

I don't know if this will make any difference to the code, but the relevant cell does not always contain validation/input comment.

Many thanks!

 

[Michael M]

Hi Paul
What code are you using ?

 

[Ironman]

Michael

In the Workbook_Close event

    Worksheets("Training Log").[d].End(xlUp).Row 1
    Validation.InputMessage = Empty
    Validation.InputTitle = Empty

Errored code '424' Object required

 

[Michael M]

Don't have excel so UNTESTED

lr = Worksheets("Training Log").Cells(Rows.Count, "D").End(xlUp).Row
  With Cells(lr, "D")
   .Validation.InputMessage = Empty
    .Validation.InputTitle = Empty
    End With

 

[Ironman]

Brilliant, that works perfectly, thanks a lot Michael!

 

[Michael M]

I think the code I provided will error if there is no DV in the cell. Try

lr = Worksheets("Training Log").Cells(Rows.Count, "D").End(xlUp).Row
  With Worksheets("Training Log").Cells(lr, "D")
  On Error Resume Next
   .Validation.InputMessage = Empty
    .Validation.InputTitle = Empty
    End With

 

[Ironman]

That's great, thanks for thinking of that.

 

[Michael M]

Glad to help...