Ana Formdaki Denetimden Alt Formdaki Denetime Veri

1 2 3 4
18/03/2020, 20:34

SeferŞANLI

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?
18/03/2020, 21:45

SeferŞANLI

Çözemedim arkadaşlar
18/03/2020, 22:37

SeferŞANLI

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

berduş

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.
18/03/2020, 23:25

berduş

Bu arada anaformda neye çift tıkladığınızda altformda hangi denetime ne göndermek istiyorsunuz onu da belirtin.
18/03/2020, 23:26

SeferŞANLI

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