AccessTr.neT

Tam Versiyon: Ülke Düzenle Yan Yana
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2 3 4
References' ten Microsoft ActiveX Data Objects X.X Library seçmelisiniz.
Sayın. Atoykan Hocam Evet Değişken Ülkeler
Sayın. Userx Hocam Evet Taşıma İşlemi Yapıyor.

Fakat Taşırken Sütunları Karıştırıyor Ülkeler
Eski Sırasına Tekrar Gelmiyor
Birde Farklı Bir Ülke Eklemek İstesem Eklemiyor

Teşekkürler
(29/04/2022, 13:56)berduş yazdı: [ -> ]önce aşağıdaki koda sahip bir sorgu oluşturun adı Cp olsun
TRANSFORM Ülke_Düzenle2.Ülke
SELECT Ülke_Düzenle2.sayı, Ülke_Düzenle2.Otel_Adı, Ülke_Düzenle2.tutar
FROM Ülke_Düzenle2
GROUP BY Ülke_Düzenle2.sayı, Ülke_Düzenle2.Otel_Adı, Ülke_Düzenle2.tutar
PIVOT Ülke_Düzenle2.Ülke;
daha sonra aşağıdaki kodu butona atayıp dener misiniz?
CurrentDb.Execute "INSERT INTO Ülke_Düzenle ( sayı, Otel_Adı, Ülke_1, Ülke_2, Ülke_3, Ülke_4, Ülke_5, tutar ) " & _
          "SELECT sayı, Otel_Adı,[Danimarka],[İtalya],[Belçika],[İngiltere],[Romanya],[tutar] " & _
          "FROM Cp;"
Not: yapmaya çalıştığınız şeyi tam anlamadım ama eldeki verilere göre bu kodlar işinize yarayabilir

Sayın @berduş Hocamızın yazdığı 1. koddaki sorgu Pivot özelliği ile yeni eklenen ülkeler için alan tanımlanmasını sağlar bunların tablonuzda yer almasını istiyorsanız 2. kodda bir append query ile tablo oluşturmanız gerekir. Ülke_Düzenle tablosunu tekrar kullanmak istiyorsanız oluşturacağınız tablo XYZ gibi yeni bir tablo olmalıdır. Bu çerçevede @berduş Hocamın verdiği 2. kodu


DoCmd.DeleteObject acTable, "XYZ"
CurrentDb.Execute "SELECT cp.* INTO XYZ FROM cp;"

şeklinde revize ederek kullanırsanız yanyana istediğiniz kadar ülke eklesenizde tablonuzu oluşturmuş olursunuz.
Sayın @golf2000 ekteki dosyayı inceler misin?
Sayın Userx hocama, Berduş hocama ve Atoykan hocama ellerinize emeğinize sağlık teşekkür ederim


Tam istediğim gibi oldu
Konumla ilgilenen tüm arkadaşlara da ayrı ayrı çok teşekkür ederim
Sayfalar: 1 2 3 4