select * from ["+sayfaadı+"$]

[mahmyt]

Üstatlarım merhaba;
Aşağıdaki kodda indirilecek kdv listesi sayfasından veri alabiliyorum ancak 1 den fazla excel dosyasında diğer excellerden veri alırken sayfa adları değişkenlik göstermektedir.
İnternette araştırma yaptım ama doğru veri alamadım.

Yardımlarınız için şimdiden teşekkür ederim.


Kod:
sorgu = "Select * From [İndirilecek KDV Listesi$]"

 

[Trilenium]

Soru ne?

 

[mahmyt]

örnek olarak
Aynı dosya içerisinde 1.excelde indirilecek kdv listesi sayfasından
sorgu = "Select * From [İndirilecek KDV Listesi$]" bu kodla veri alırken 2.excel de ise sadece indirilecek yazan sayfadan veri almak istiyorum sayfa adları değişmesiyle kod çalışmayacağı için sorgu = "Select * From [İndirilecek KDV Listesi$]" kod kısmında fromdan sonra sheet1 i tetikleyecek ifadeyi nasıl oluşturabilirim.

 

[Necdet]

Merhaba,

Dosyalarda sayfa sayıları aynı mı?
Diyelim ki sadece ilk sayfadan veriler çekilecekse işiniz kolay ama her dosyada çok sayfa var ve sayfa adları da değişken olursa işiniz zor.

 

[mahmyt]

necdet bey merhaba

tek sayfa var üstadım sadece dosya adları tutmuyor

 

[Korhan Ayhan]

Forumda catalog ifadesi ile arama yapabilirsiniz.

Bir ornek; https://www.excel.web.tr/threads/kapali-dosyadaki-sayfa-adlarini-listboxta-listeleme.199995/#post-1119407

 

[Necdet]

Merhaba,
Aşağıdaki kodu dener misiniz?

Dim Sorgu As String
Sorgu = "Select * From [" & Sheets(1).Name & "$]"

 

[mahmyt]

necdet bey ve korhan bey allah razı olsun çok teşekkür ederim.