Private Sub Liste885_DblClick(Cancel As Integer)
DoCmd.OpenForm "alb_is_calisma", , , "[adi_soyadi]='" & Me.Liste885.Column(2) & "'"
End Sub
Me.Liste885.Column(3) Olarak yazmışsın. Sütunları 0,1,2 şeklinde saymalısınız.
Me.Liste885.Column(3) Olarak yazmışsın. Sütunları 0,1,2 şeklinde saymalısınız.
Toprağa her türlü kötü şey atılmasına rağmen
Topraktan hep güzel şeyler biter . (Akşemseddin)
Topraktan hep güzel şeyler biter . (Akşemseddin)
