Çözüldü textbox tarih

[sirkülasyon]

Hayırlı Günler
Userformda 6 tane textbox var. Bu textboxlara doğum tarihi girişi yapılıyor.
örnek olarak 05022019 formatında girildiği zaman 05.02.2019 formatına dönüşmesi için ne yapılması lazım?

Teşekkür eder, saygılarımı sunarım

 

[Haluk]

TextBox1'den çıklıldığında çalışmak üzere;

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    If Len(TextBox1) <> 8 Then
        MsgBox "GGAAYYYY biçiminde giriş yapın"
        TextBox1 = Empty
        Cancel = True
        Exit Sub
    End If
    myYear = Right(TextBox1, 4)
    myMonth = Mid(TextBox1, 3, 2)
    myDay = Left(TextBox1, 2)
    myDate = DateSerial(myYear, myMonth, myDay)
    TextBox1.Text = Format(myDate, "dd/mm/yyyy")
End Sub

.

 

[sirkülasyon]

Haluk abi
bu kodu kaç tane doğum tarihi girilen textbox var ise her birine ayrı ayrı hazırlayacağız değil mi?

 

[Haluk]

Evet

.

 

[sirkülasyon]

Allah Razı Olsun. Teşekkür eder, saygılarımı sunarım