AccessTr.neT

Tam Versiyon: Aktarma Sorunu
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Herayın = malzeme girişin her ayın 1 yada 3-5 oluyor

tablo2 ye her ayın 27 ile 29 günlerinde girenleri aktarmak istiyorum
ayın 1 ile 31 olan tarih seçimlerimde sıkıntı yok
lakin örneğin ilk seçimim 30.01.2019 ile 4.02.2019 olunca yani ayar farklı olunca 30 u ile 4'ü arası değil 4'ü ile 30'u arasını getiriyor

nasıl bir sorgu yapmalıyım 

teşekkürler
sorun tablonuzun yapısıyla ilgili olabilir, tablonuzda sadece günler var ve hangi gün hangi aya ait belli değil. tablonuzda ayları/yılları  belirten bir alan olmadığından bu haliyle istediğiniz verileri almayı başaramazsınız gibime geliyor
Merhaba, butonun tıklandığında olayındaki kodu aşağıdaki ile değiştirerek deneyiniz.

Kod:
Dim rs As DAO.Recordset
A1 = InStr(Me.Metin3, ".")
Me.Metin1 = Left(Me.Metin3, A1 - 1)

A2 = InStr(Me.Metin4, ".")
Me.Metin2 = Left(Me.Metin4, A2 - 1)




Me.Recordset.Requery
Set rs = Me.RecordsetClone

DoCmd.SetWarnings False 'Hata vermemesi için gerekli




If Val(Me.Metin1) > Val(Me.Metin2) Then

DoCmd.RunSQL "INSERT INTO Tablo2 ( kimlik, malzeme, Herayın ) SELECT kimlik, malzeme, Herayın FROM Tablo1 WHERE (((Herayın)>=" & Me.Metin1 & " Or (Tablo1.Herayın)<=" & Me.Metin2 & "));"

Else


DoCmd.RunSQL "INSERT INTO Tablo2 ( kimlik, malzeme, Herayın ) SELECT kimlik, malzeme, Herayın FROM Tablo1 WHERE (((Herayın) Between " & Me.Metin1 & " And " & Me.Metin2 & "));"

End If




DoCmd.SetWarnings True 'Hata vermemesi için gerekli
Me.Liste5.Requery
tamamdır teşekkür ederim