AccessTr.neT

Merhaba Hocalarım,

Ekteki Kasa çalışmamda userform1 deki listbox1 verilerine çift tıkladığımda userform2 deki texbox lara verileri aldıramadım.
Yardımcı olursanız sevinirim.

Saygılarımla,

Ahmet Yenginoğlu

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)

        

    With UserForm2

        .TextBox_SIRA.Value = Me.ListBox1.List(Me.ListBox1.ListIndex, 0)

        .TextBox_TARIH.Value = Format(Me.ListBox1.List(Me.ListBox1.ListIndex, 1), "dd.mm.yyyy")

        .Show

    End With

    Unload Me

    

End Sub

Sayın Feraz ilginize çok teşekkür ederim. Konu Taşınabilir.

Saygılarımla,

yenginoglu

feraz

yenginoglu