Skip to main content

AccessTr.neT


Sekmeyi sürekli yeni kayda yollama

Sekmeyi sürekli yeni kayda yollama

Çözüldü #7
benim yapmak istediğim analitik muhasebeyle ilgili projemde fişgiriş formunda yansıtma tuşuna bastığımda FGALT formumda yer alan verileri kontrol edecek içlerinde mesela 600 hesap kodu varsa 800 hesapkodu ile bunu yansıtarak FGALT formunun en altına ilave edecek
Kod:
Private Sub YANSITMA_Click()

If Me.[FGALT10]![HESAPNO].Value = "600" Then

Me![FGALT]![HESAPNO] = "800"
Me![FGALT]![Y1] = Me![FGALT10]![Y1]
Me![FGALT]![Y2] = Me![FGALT10]![Y2]
Me![FGALT]![Y3] = Me![FGALT10]![Y3]
Me![FGALT]![Y4] = Me![FGALT10]![Y4]
Me![FGALT]![Y5] = Me![FGALT10]![Y5]
Me![FGALT]![HESABINADI] = Me![FGALT10]![HESABINADI]
Me![FGALT]![BORÇ] = Me![FGALT10]![BORÇ]
Me![FGALT]![ALACAK] = Me![FGALT10]![ALACAK]
End If


End Sub

yansıtılacak hesap tek olnca problem yaşamıyorum mesela iki adet hesap yansıtılacaksa yansıtma butonuna bastığımda iki ayrı hesap kodunuda kontrol edecek ve yansıtmalarını alt alta FGALT formuna iki kayıt olarak ilave edecek
Kod:
Private Sub YANSITMA_Click()

If Me.[FGALT10]![HESAPNO].Value = "600" Then

Me![FGALT]![HESAPNO] = "800"
Me![FGALT]![Y1] = Me![FGALT10]![Y1]
Me![FGALT]![Y2] = Me![FGALT10]![Y2]
Me![FGALT]![Y3] = Me![FGALT10]![Y3]
Me![FGALT]![Y4] = Me![FGALT10]![Y4]
Me![FGALT]![Y5] = Me![FGALT10]![Y5]
Me![FGALT]![HESABINADI] = Me![FGALT10]![HESABINADI]
Me![FGALT]![BORÇ] = Me![FGALT10]![BORÇ]
Me![FGALT]![ALACAK] = Me![FGALT10]![ALACAK]
End If

If Me.[FGALT10]![HESAPNO].Value = "630" Then

Me![FGALT]![HESAPNO] = "830"
Me![FGALT]![Y1] = Me![FGALT10]![Y1]
Me![FGALT]![Y2] = Me![FGALT10]![Y2]
Me![FGALT]![Y3] = Me![FGALT10]![Y3]
Me![FGALT]![Y4] = Me![FGALT10]![Y4]
Me![FGALT]![Y5] = Me![FGALT10]![Y5]
Me![FGALT]![HESABINADI] = Me![FGALT10]![HESABINADI]
Me![FGALT]![BORÇ] = Me![FGALT10]![BORÇ]
Me![FGALT]![ALACAK] = Me![FGALT10]![ALACAK]
End If
End Sub

o zaman kodu bu şekilde düşündüm ama sorun ikisinide aynı satıra sıra ile yazıyor sonuçta son 830 yansıtma hesabı kalıyor sadece sorunum bundan ibaret. Yansıt dediğimde FGALT10 formunu kontrol edip sırasıyla yansıtılacak hesapları FGALT formuna girmesini istiyorum.
altansoft 08-03-2009.
Cevapla
Çözüldü #8
valla ben soruyu anlamadım.
şöyle diyeyim: istediğin kadar kayıt eklemek mümkün yeterki kriteri tam olarak açıklayabilirsen olay biter.
demişsinki "600 hesap kodu varsa bunu 800 hesap kodu ile yansıtarak ??"
kriter bu mu? bunu tam açıklayabilirsen herkes yardımcı olabilir.
Cevapla
Çözüldü #9
evet kriterin bir bölümü bu 600 bütçe gelirlerinin yansıtması 800, 630 bütçe giderlerinin yansıtması 830 hesap kodu fgalt formunda hangi varsa onu kontrol edecek işleyecek olmayanı es geçecek. 900 hesap kodlarıda var ama şimdilik onlara gerek yok 800 leri yaptıktan sonra onlara aynını uygulayabiliriz
altansoft 08-03-2009.
Son Düzenleme: 22/06/2009, 08:25, Düzenleyen: altangüven.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da