Private Sub listefirma_DblClick(Cancel As Integer)
On Error GoTo ListefirmaHata
If IsNull(Me.txtsecim) Or Me.txtsecim = 0 Then

Me.txtsecim = 1
Else
Me.txtsecim = Me.txtsecim + 1
End If

Forms![frm_malzemeler]![Me.listefirma.Column(2)] = Forms![frm_malzemeler]![frm_ihtiyac].Form![Me("txtf" & txtsecim)]

'Me("txtf" & txtsecim) = Forms![frm_malzemeler]![Me.listefirma.Column(2)]

ListefirmaCikis:
Exit Sub

ListefirmaHata:
MsgBox ("Firma Seçimleri Tamamlandı")
Resume ListefirmaCikis

End Sub


ana form=frm_malzemeler
denetim=listefirmalar

altform=frm_ihtiyac
denetimler
txtf1
txtf2
txtf3

ana formdan çift tıklamayla altformdaki denetime göndermek istiyorum lakin olmuyor?