İyi çalışmalar arkadaşlar kurumumda kullandığım kendi yaptığım bir
Access te bir programda içinden çıkamadığım bir sorunum var yardımcı olursanız sevinirim
Soru tablolarda analizler olarak analiz adı ve bu analizlerin fiyatlarını oluşturdum. Mutabakat formunda her bir numune için gerekli bilgiler girildikten sonra istenen analizler tablolar dan analizler tablosundan acılan pencerede istendiğinde analiz adı geliyor ancak 2. Sütundan fiyatlar gelmiyor. Acaba fiyatlarında gelmesi sağlanabilir mi yada arka planda fiyatlar toplanarak formdaki fiyat kısmına yazdırılabilir mi . ekte bulunan örnekte yapabilirseniz çok sevinirim .
takip adlı dosya eklemeye çalıştım
Fatih KARA
sayın fatihkara,
sadece bilgilendirme olması ve naçizane tavsiye niteliğinde hatırlatma adına;
Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
yukarıda bağlantısı yazılı konuyu incelemenizin ve içeriğindeki hususlara (özellikle de,Türkçe karakter kullanma ve BOŞLUK tanımlama durumları olmak üzere) göre uygulamanızı yeniden düzenlemenizin,
ileride bu hususlardan kaynaklı sorunları da engellemenize imkan sağlaması söz konusu olacaktır kanısındayım.
son olarak;
içeriğinde gerçek bilgiler olduğu gerekçesi ile,eklediğiniz örnek uygulama onaylanmamıştır.
lütfen,içeriğindeki bilgileri farazi gerçek dışı uydurma isimler (bilgiler) ile değiştirerek tekrar ekleyiniz.
Bilginize…iyi çalışmalar,saygılar.
yeni dosya lütfen bakın[
attachment=26043]
(09/12/2016, 17:33)fatihkara yazdı: [ -> ]yeni dosya lütfen bakın
1 aydır uğraştım çözemedim
Soru tablolarda analizler olarak analiz adı ve bu analizlerin fiyatlarını oluşturdum. Mutabakat formunda her bir numune için gerekli bilgiler girildikten sonra istenen analizler tablolar dan analizler tablosundan acılan pencerede istendiğinde analiz adı geliyor ancak 2. Sütundan fiyatlar gelmiyor. Acaba fiyatlarında gelmesi sağlanabilir mi yada arka planda fiyatlar toplanarak formdaki fiyat kısmına yazdırılabilir mi . ekte bulunan örnekte yapabilirseniz çok sevinirim .
Merhaba, sorunuzdan anladığım kadarıyla,
formun
Vba sayfasına aşağıdaki kodu ekle
Sub AnalizHesapla()
Dim AnalizToplami As String
AnalizToplami = Val(Nz([AN].Column(1), 0)) + Val(Nz([AN1].Column(1), 0)) + Val(Nz([AN2].Column(1), 0)) + Val(Nz([AN3].Column(1), 0)) + Val(Nz([AN4].Column(1), 0)) + Val(Nz([AN5].Column(1), 0)) + Val(Nz([AN6].Column(1), 0)) + Val(Nz([AN7].Column(1), 0)) + Val(Nz([AN8].Column(1), 0)) + Val(Nz([AN9].Column(1), 0)) + Val(Nz([AN10].Column(1), 0))
Me.ANALİZ_BEDELİ = AnalizToplami
End Sub
Analiz ile ilgili açılan kutuların güncelleştirme sonrasında olaylarına aşağıdaki kodu ekle,
Private Sub AN_AfterUpdate()
AnalizHesapla
End Sub
Bu AN isimli açılan kutuya ait kod, A10'a kadar tüm açılan kutulara bu kodu eklemelisin.
sayın ozan bey,
hoşgörünüze sığınaraktan aşağıdaki açıklamaların yapılması uygun görülmüştür.
yazdığınız kodlar,konu sahibinin eklediği örneğin geçerli olduğu hali ile uygulanacak olduğunda yeterli olmayacaktır.çünkü;bazı düzenlemelerin de yapılması akabinde ancak,olumlu sonuç elde etme durumu söz konusudur.
1)
ANALIZLER adlı tablo,eklenen hali ile soruna neden olacaktır.dolayısı ile de,tabloya bir ID değer içeren ALAN ADI dahil etmek gerekmektedir ki,form üzerindeki Açılan Kutulardan istenen değerlerin seçimi rahat yapılabilsin.
2)
form üzerindeki Açılan Kutuların her birinin
SÜTUN SAYISI için 3 değerini,
SÜTUN GENİŞLİKLERİ için de resimdeki değerlerin girilmesi gerekmektedir.
3)
her bir Açılan Kutunun SATIR KAYNAĞI satırında,yukarıdaki gibi sorgu oluşturulması gerekmektedir.
4)
yazdığınız toplam fonksiyonu için,bir önceki resimde yer alan sorgu değerine göre,FİYAT değeri son kolonda olacağı gerekçesi ile,
.COLUMN(1) değerlerinin .COLUMN(2) olarak değiştirilmesi gerekmektedir.
5)
bütün bu düzenlemeler yapıldıktan sonra,form çalıştırılıp üzerindeki her bir Açılan Kutu seçimlerinde değer belirlendiğinde,
toplam değerin aktarıldığı denetimde,istenen toplam sonucu elde edilmiş olacaktır.
bilginize...iyi çalışmalar,saygılar.