AccessTr.neT

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?

Çözemedim arkadaşlar

https://accesstr.net/konu-alt-form-gunce...80770.html
bu konuyu defalarca okumama ve çalışmama uyarlama ma rağmen kod çalışmıyor.

Sefer bey her defasında "çalışmanızı ekleyin" dememiz gerekmez bence, önceki sorunuzda yanlış değilsem anaformunuzda altform yoktu eğer çalışmanızda değişiklik olmuşsa dosyanızın yeni halini ekleyin yok daha önce aynı dosyayı eklemişseniz bağlantısını verip öyle sorun.
Dosyanızı eklemeniz konusunda bir daha herhangi bir uyarıda bulunmayacağım. Iyi calismalar.

Bu arada anaformda neye çift tıkladığınızda altformda hangi denetime ne göndermek istiyorsunuz onu da belirtin.

Tamam. Kusura kalmayın. Ben kodun yazımında ki hatayı sormuştum.