kolay gelsin
daha önce açmış olduğum konulardan farklı olarak yapmaya çalıştığım
önceki örneklerde değer listesi şeklinde ve herhangi bir tabloya bağlı olmadan örnekler var uyarlayamadım kendi formuma

formuma uygun örneği ekledim.

SALON 1 SEÇİLDİĞİ ZAMAN MAKİNE1 TABLOSUNDAKİ DEĞERLER GÖRÜNSÜN AÇILAN KUTU ŞEKLİNDE

SALON 2 SEÇİLDİĞİNDE MAKİNE 2 TABLOSUNDAKİ MAKİNELER GÖRÜNSÜN SALON 3 VE SALON 4 TE AYNI ŞEKİLDE OLACAK YAPAMADIM AÇILAN KUTU ŞEKLİNDE SADECE 1 TANE SALONUN MAKİNESİ GÖRÜNÜYOR.SALON 2 SEÇİNCE MAKİNE 1 ÇIKIYOR TEK TEK OLUYOR ŞARTA BAĞLI YAPAMIYORUM.
SALON 1 SEÇTİĞİM ZAMAN 1-57 ARASI MAKİNE NUMARALARI ÇIKINCA BOY SIFIR OLACAK
SALON 2 SEÇİNCE 1-24 ARASI DEĞERLER ÇIKACAK 1 İLE 14-15-16-17-18-19-20-21-22-23-24 NOLARINI SEÇİNCE BOY 2,90  VE 2-13 DAHİL ARASI SEÇİNCE 2,85 OLACAK
ŞEKİLDE YAPAMIYORUM.BUNLARI ÖRNEKLERLE GÖSTERDİNİZ AMA ÖRNEKLERDE BÖYLE BİRŞEYİ YAPAMADIM BULAMADIM YOLUNU.
BU YAPILANLAR İŞLEMTAB TABLOSUNDA GÖRÜNECEK TABLOYA BAĞLAYAMADIM MAKİNE NUMARALARINI İŞLEMTAB A  AKTARAMIYORUM.İLİŞKİLENDİRMEYİ YAPAMADIM.

İncelermisiniz...

Lütfen olumlu veya olumsuz geri dönüş yapınız...

ÇOK ÇOK TEŞEKKÜR EDERİM ELLERİNİZE SAĞLIK

Dim Sql As String



Dim db As Database

Dim rs As DAO.Recordset

Set db = CurrentDb()

SQL = "SELECT * FROM islemtab"

Set rs = db.OpenRecordset(SQL)

rs.AddNew

rs!SALONNO = Me.SALONNO

rs!ÜRÜNNO = Me.ÜRÜNNO

rs!MAKİNENO = Me.MAKİNE0

rs!BOY = Me.Metin4

rs.Update

Me.SALONNO = ""

Me.ÜRÜNNO = ""

Me.MAKİNE0 = ""

Me.Metin4 = ""



End Sub

KODUN AÇIKLAMASI NEDİR
SQL KOD NASIL ÖĞRENECEĞİM Vba KOD KİTAPLARININ FAYDASI OLUR MU KOD YAZMAYI ÖĞRENMEK İÇİN MANTIĞINI ANLATAN BİR KAYNAK VAR MI

KONU CEVAPLANAN KONULARA TAŞINABİLİR.
BAŞKA KİŞİLERDE FAYDALANABİLMESİ İÇİN GÜZEL BİR ÖRNEK OLMUŞ

TABLOLARI KULLANMAYI ÖĞRENMİŞ OLACAĞIM İNŞALLAH SAYENİZDE

www.accesstr.net sizin için yeterli bir kaynaktır. Bana kitaptan öğrenilmez gibi geliyor.. Örnekleri inceleyerek, kurcalayarak ve yeni ihtiyaçlar oluştukça farkında olmadan öğreneceksiniz..

Kolay gelsin..

Insallah bakiyorum arastiriyorum ogrenecegiz insallah cok tesekkur ederim