Install Date Picker in two separate columns in Excel
install a date picker in a range of cells, install a date picker in two different cells.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Sheet1.DTPicker1
.Height = 20
.Width = 20
If Not Intersect(Target, Range(“D3:D10, F3:f10”)) Is Nothing Then
.Visible = True
.Top = Target.Top
.Left = Target.Offset(0, 1).Left
.LinkedCell = Target.Address
Else
.Visible = False
End If
End With
End Sub
For more help visit my website
I am able to provide online help on your computer for a reasonable rate.
MY videos are all created on Camtasia.
Follow me on Facebook
Watch more new videos about Excel Office | Synthesized by Mindovermetal English
Barb, do I need to change the "Sheet1" in the code to another sheet name if I intend to use the date picker on another sheet in a workbook? I have been successful on a new workbook sheet 1 but I just cant get it to work on another sheet in an established workbook.
You are awesome, thanks very much for your help!!