Alt Alta Düzenle

nasıl kullanacağınızı bilmiyorum ama eğer isimlendirme sistemi ulke_Sayı biçimindeyse sorgu for döngüsüyle dinamik olarak da oluşturulabilir
1 - referanslardan microsoft activex Data Object xx.x library eklenmeli
2 - aşağıdaki kod bir butona atanmalı
debug.print komutu immidiate ekranına yazar

Dim Sql As String

Dim ADO_RS As ADODB.Recordset

Dim Fld As ADODB.Field



Set ADO_RS = New ADODB.Recordset

SQL = "select * from [Ülke_Düzenle]"

ADO_RS.Open SQL, CurrentProject.Connection, 3, 1

For Each Fld In ADO_RS.Fields

If Left(Fld.Name, 5) = "Ülke_" Then

    SqlUnion = SqlUnion & " union " & _

                          " SELECT Ülke_Düzenle.sayı, Ülke_Düzenle.Otel_Adı, Ülke_Düzenle." & Fld.Name & " As [Ülke], Ülke_Düzenle.tutar " & _

                          " FROM Ülke_Düzenle " & _

                          " WHERE ((Not (Ülke_Düzenle." & Fld.Name & ") Is Null))"

End If

Next

Debug.Print Mid(SqlUnion, 7) & ";"

Sayın. Berduş Hocam
Değerli Zamanınızı Bizlere Ayırdığınız İçin Çok Teşekkür Ederim Elinize Emeğinize Bilginize Sağlık Çok Teşekkür Ederim Zahmetler Verdirdim Size Sağolun ama yapamadım Sağolun.

açıkçası tam olarak ne istediğiniz yapıyı anlamadım
tabloların yapısının değiştirilmesi çok rastlanan bir durum değildir o nedenle tekrar sorayım tablo yapınız değişecek mi
yani diyelim bir gün tablonuzda 10 alan olacak başka bir gün 4 alan 1 ay sonra 7 alan mı olacak

Sayın berduş hocam
Evet sabit sütun ekleme olmayacak

Ozaman birlestirme sorgusuna neden karşısınız her zaman dogru bir sekilde listeyi gosterir
Sorguyu baska sorgu icinde kullanarak istediginiz yerde kullanabilirsiniz

Sayın. Berduş hocam

Aslında evet dediğiniz doğru haklısınız peki sütun ismi degistirdigim de tablodan
Birleştirme sorgusunda hata verir mi. Birde hocam şimdi ben size evet sütun sayıları şuan sabit dedim peki ekstradan bir ülke sütünü açmak istersem birleştirme sorgusuna bunu ekleye bilirmiyim

Teşekkürler