Skip to main content

AccessTr.neT


Ana Formdan Butonlarla Alt Form Yönetme

Ana Formdan Butonlarla Alt Form Yönetme

#7
Tmm yükledim ama Ana formun icinde 6 tane form var ana formdaki butonlar 5 adet
.rar new.rar (Dosya Boyutu: 191,3 KB | İndirme Sayısı: 6)
Cevapla
#8
Ö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 Img-grin))
İnadına, ille de Accesstr.net...
Cevapla
#9
Bir tane örnek yapsaydınız çok daha yararlı olacaktı

Alt formdaki kod çalıştı ama Ana formdaki çalışmadı
Son Düzenleme: 02/09/2018, 20:41, Düzenleyen: kursun.
Cevapla
#10
Hem alt forma hemde ana forma deneme diye bir buton koydum


[Resim: do.php?imgf=153591050618441.jpg]
.rar new.rar (Dosya Boyutu: 195,5 KB | İndirme Sayısı: 1)
Cevapla
#11
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.
İnadına, ille de Accesstr.net...
Cevapla
#12
Ben aslında tamamını yapmıştım ama sizin kendiniz yapın diye biraz bekledim. Buyrun tamamı bitmiş hali.
.rar new.rar (Dosya Boyutu: 243,49 KB | İndirme Sayısı: 9)
İnadına, ille de Accesstr.net...
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da