A date picker userform for Mac.

[mikerickson]

It should work from another userform.

I'm at work and can't test, but I would create a userform, with a command button, a text box and this code and see what happens.

Private Sub CommandButton1_Click()
    Dim uiDate As String
    
    uiDate = macDate.Chosen
    
    If uiDate = False Then
        MsgBox "canceled"
    Else
        TextBox1.Text = Format(uiDate, "mm/dd/yyyy")
End Sub

The userform that is the date picker must be named macDate.

[florianreply]

It should work from another userform.

I'm at work and can't test, but I would create a userform, with a command button, a text box and this code and see what happens.

Private Sub CommandButton1_Click()
    Dim uiDate As String
    
    uiDate = macDate.Chosen
    
    If uiDate = False Then
        MsgBox "canceled"
    Else
        TextBox1.Text = Format(uiDate, "mm/dd/yyyy")
End Sub

The userform that is the date picker must be named macDate.

__________


mikerickson you are the bomb! totally saved my life it would have taken me months if not years to determine how to program that. thank you for sharing your knowledge and please continue to do so!

[dmc311]

Very cool. thanks Mike.

[sophia.ho]

Thank you!

It should work from another userform.

I'm at work and can't test, but I would create a userform, with a command button, a text box and this code and see what happens.

Private Sub CommandButton1_Click()
    Dim uiDate As String
    
    uiDate = macDate.Chosen
    
    If uiDate = False Then
        MsgBox "canceled"
    Else
        TextBox1.Text = Format(uiDate, "mm/dd/yyyy")
End Sub

The userform that is the date picker must be named macDate.