Ana Formdan Butonlarla Alt Form Yönetme

1 2 3
02/09/2018, 15:20

kursun

Tmm yükledim ama Ana formun icinde 6 tane form var ana formdaki butonlar 5 adet
02/09/2018, 20:17

mehmetdemiral

Önce altformdaki butonlarınızı koda dönüştürmelisiniz. Bunun için gereken kodları zaten arkadaş yukarıya yazmış. Butonlardaki macroları silip kodları yerleştirin. Mesela 1. düğmeniz için olay yordamın normalde şöyle olmalı:

Kod:
Private Sub Komut24_Click()
DoCmd.GoToRecord , , acNewRec
End Sub

Bu normalde altform üzerinde olduğu için başka bir formdan kullanmak için kodun genele açılması amacıyla başta yer alan "private" sözcüğünü "public" ile değiştirmelisiniz. Yani:

Kod:
Public Sub Komut24_Click()
DoCmd.GoToRecord , , acNewRec
End Sub

Şimdi de ana form üzerindeki düğmenin kodlarını yazalım:

Öncelikle ana formdaki düğmeye basıldığında odağı alt forma döndürmek için
Kod:
ALTFORM.SetFocus

kodunu işletmeliyiz. Sonra da altformdaki butona kodla basmak için


Kod:
Me.ALTFORM.Form.Komut24_Click

Sonuç olarak ana formdaki "Yeni Kayıt düğmesinin tüm kodları şöyle oldu:

Kod:
Private Sub YeniKayit_Click()
ALTFORM.SetFocus
Me.ALTFORM.Form.Komut24_Click
End Sub
 Artık butonumuz alt formdaki düğmeye basıyor. Altformaki düğmeleri silmeyin, sadece görünmez yapın. Bu kadar ))
02/09/2018, 20:32

kursun

Bir tane örnek yapsaydınız çok daha yararlı olacaktı

Alt formdaki kod çalıştı ama Ana formdaki çalışmadı
02/09/2018, 20:49

kursun

Hem alt forma hemde ana forma deneme diye bir buton koydum



02/09/2018, 21:04

mehmetdemiral

Yazdıklarımı okurken bir yeri kaçırmışsınız. Alt formdaki butonun kodunu genel kullanıma açmak için "Private" değil "Public" ile başlatmalısınız.
02/09/2018, 21:24

mehmetdemiral

Ben aslında tamamını yapmıştım ama sizin kendiniz yapın diye biraz bekledim. Buyrun tamamı bitmiş hali.
1 2 3