Need to make DTPicker invisible based on another cell's value.

[Remnant]

Hi there, welcome to the board!

You can use something like this as your worksheet change event...
[vba]Option Explicit

Const sCheck As String = "I4"

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Intersect(Target, Me.Range(sCheck)) Is Nothing Then Exit Sub
If UCase(Target.Value) = "INACTIVE" Then
Me.DTPicker1.Visible = False
Else
Me.DTPicker1.Visible = True
End If
End Sub[/vba]

Thanks for the quick response! The code works, however there seems to be a glitch happening after I close the spreadsheet and re-open with it being invisible. It isn't retaining it's size or aspect ratio, even with it locked. Is there a way I can actually embed it inside the cell?