+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Belli Bir Sıraya Göre Tekrarlı Satır Değerlerini Gruplandırma. (/konu-belli-bir-siraya-gore-tekrarli-satir-degerlerini-gruplandirma.html)
Sayfalar:
1
2
RE: Belli Bir Sıraya Göre Tekrarlı Satır Değerlerini Gruplandırma. - hbal09 - 18/09/2020
Bu şekilde de denemiştim, bu sefer ardı sıra tekrarlama bitmesine karşın malzemenin başka bölümden sonra aynı bölümlerde işlem görünmesini de iptal ediyor. örneğin yukarıdaki tablo örneğine göre doğru sonuç :
BOLUM-A
BOLUM-B
BOLUM-C
BOLUM-D
BOLUM-E
BOLUM-B
BOLUM-F
BOLUM-A
BOLUM-C
iken , min ifadesi kullandığımda sonradan tekrar eden a,b,c bölümlerini de iptal ederek şöyle bir yanlış sonuç veriyor:
BOLUM-A
BOLUM-B
BOLUM-C
BOLUM-D
BOLUM-E
BOLUM-F
yapmak istediğim, sıra numarasına göre ardı sıra tekrarları sonlandırmak.
RE: Belli Bir Sıraya Göre Tekrarlı Satır Değerlerini Gruplandırma. - berduş - 18/09/2020
maalesef yapmak istediğinizi anlayamadım. çalışmanızı ekleyip daha detaylı ve örnekler üzerinden açıklama yapabilirseniz yardımcı olmaya çalışırız.
sorgu kodunu aşağıdaki gibi dener misiniz?
SELECT Tablo1.BOLUM
FROM Tablo1
WHERE (((IIf(Nz(DMax("SiraNo","tablo1","Bolum='" & [Tablo1]![BOLUM] & "' and SiraNo<" & [Tablo1]![SiraNo]),0)=Nz(DMax("SiraNo","tablo1","SiraNo<" & [Tablo1]![SiraNo]),0) And Not IsNull(DMax("SiraNo","tablo1","SiraNo<" & [Tablo1]![SiraNo])),1,0))=0));
RE: Belli Bir Sıraya Göre Tekrarlı Satır Değerlerini Gruplandırma. - hbal09 - 18/09/2020
Tam istediğim gibi oldu, ama gerçekten çok karmasık bir sorgu gerektiriyormuş.
bu çıkan BOLUM sonuçlarını raporda bir metin kutusuna yan yana nasıl yazdırabilirim?
RE: Belli Bir Sıraya Göre Tekrarlı Satır Değerlerini Gruplandırma. - berduş - 18/09/2020
raporun nasıl hazırlanacağını bilmediğim için kesin bir şey öneremem
ama aşağıdaki kodu bir butona yazarsanız yan yana yazar
Dim SqlRs As String
Dim TrhDz As Variant
SqlRs = "SELECT BOLUM from SQLTekrarsiz"
Set rs = CurrentDb.OpenRecordset(SqlRs, dbOpenSnapshot)
rs.MoveLast
rs.MoveFirst
KytSay = rs.RecordCount
TrhDz = rs.GetRows(KytSay)
For x = 0 To KytSay - 1
Metin0 = Metin0 & " " & TrhDz(0, x)
Next x
Metin0 = Trim(Metin0)RE: Belli Bir Sıraya Göre Tekrarlı Satır Değerlerini Gruplandırma. - hbal09 - 18/09/2020
Çok Teşekkür ederim, rapor yüklendiğinde olayına bu kodları eklediğimde istediğim metin kutusuna değerleri yan yana yazdırabiliyorum.
tekrar çok teşekkürler.
Sorunum çözülmüştür.
RE: Belli Bir Sıraya Göre Tekrarlı Satır Değerlerini Gruplandırma. - berduş - 18/09/2020
rica ederim)
iyi çalışmalar
Not isterseniz for x yerine dizideki tüm elemanları ekleyen aşağıdaki döngüyü de kullanabilirsiniz
For Each xEleman In TrhDz
Metin0 = Metin0 & " - " & xEleman
Next xEleman