Kayıt Tarihi: 28.10.2010
Toplam 43 konu açtı.
Toplam 166 yorum yaptı.
Mevcut Office Sürümü:
Office 2003,
Office 2007,
Office 2010,
Office 2013,
Office 2016,
Office 2019,
Beğeniler: 1 / 0
Sayın hocalarım; EK teki dosyada T200_Gorusme tablosndaki sınıfı A12 ve 12 olanları MEZUN tablosuna eklemek istiyorum. Bunun için nasıl bir VBA kodu yazabilirim? Yardımızı bekliyorum.
Eklenti Dosyaları
EKLEME.rar (Boyut: 12,12 KB / İndirilme: 74)
Kayıt Tarihi: 25.02.2010
Toplam 20 konu açtı.
Toplam 713 yorum yaptı.
Toplam
0
puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010 TR,
Office 2013 TR,
Beğeniler: 0 / 1
Merhaba, aşağıdaki kodu kullanabilirsiniz.
Visual Basic
Dim strSQL As String
strSQL = "INSERT INTO MEZUN ( OkulNo, AdiSoyadi, Sinifi, sube, oyil ) "
strSQL = strSQL & "SELECT T200_Gorusme. OkulNo, T200_Gorusme. AdiSoyadi, T200_Gorusme. Sinifi, T200_Gorusme. sube, T200_Gorusme. oyil "
strSQL = strSQL & "FROM T200_Gorusme "
strSQL = strSQL & "WHERE ((( T200_Gorusme. Sinifi)= 'A12' Or (T200_Gorusme.Sinifi)='12')); "
DoCmd . RunSQL strSQL
MsgBox "Kayıtlar Eklendi", vbInformation, "Bilgi"
"Gönül deniz, dil kıyıdır. Denizde ne varsa kıyıya o vurur"
Kayıt Tarihi: 27.03.2010
Toplam 44 konu açtı.
Toplam 326 yorum yaptı.
Toplam
0
puanı bulunmakta.
Mevcut Office Sürümü:
Office 2003,
Office 2007 TR,
Beğeniler: 0 / 0
sayın üstadlarım peki t200 tablosundaki A12 ve 12 olan bilgisler silinsin demek için ne yazmamız lazım
Kayıt Tarihi: 28.10.2010
Toplam 43 konu açtı.
Toplam 166 yorum yaptı.
Mevcut Office Sürümü:
Office 2003,
Office 2007,
Office 2010,
Office 2013,
Office 2016,
Office 2019,
Beğeniler: 1 / 0
Sayın aydın hocam cevap güzel. Ancak benim istediğim birincisi sorgu VBA kodu ile olacak, ikincisi sınıfı 12 olanların hepsini bolup MEZUN tablosuna ekleyecek. Mesela filtrelemede kullandığımız gibi. Sınıfı içerisinde 12 yazanların tamamını alacak
Kayıt Tarihi: 28.10.2010
Toplam 43 konu açtı.
Toplam 166 yorum yaptı.
Mevcut Office Sürümü:
Office 2003,
Office 2007,
Office 2010,
Office 2013,
Office 2016,
Office 2019,
Beğeniler: 1 / 0
17-07-2012, 13:10
(En son düzenleme: 17-07-2012, 13:22 idrisy .)
Sayın dreamt teşekkür ederim. Tam istediğim gibi olmuş eline sağlık. Silme sorgusunuda yapmanız mümkün mü acaba?