• Foruma hoş geldin 👋 Ziyaretçi

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü ADO excelden excele veri çekme

Bu sorun verilen destek sayesinde çözüme ulaştırılmıştır.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
nunu446

nunu446

Yeni Üye
Kullanıcı Bilgileri
Katılım
13 Nis 2021
Mesajlar
239
Aldığı beğeni
22
Excel Versiyonu
Office 2019 EN
Konuyu Başlatan
Merhaba. 00 ile 09.04.2021 isimli dosyalar 09.04.2021 isimli klasörde mevcut, 26.03.2021 isimli dosya ise 26.03.2021 isimli klasörde. 00 isimli dosyanı açtığınız zaman orda 26.03.2021 ve 09.04.2021 isimli sütunlar var ve ADO yöntemi ile 26.03.2021 isimli dosyanı açtığımızda TOTAL sayfasındakı TOTAL isimli hücrenin yanındaki rakamı 00 isimli dosyada bulunan 26.03.2021 sütununun altına getirmek, aynı işlemi 09.04.2021 isimli dosya için de geçerli. Şöyle bir şey yapmak mümkün mü?
 

Ekli dosyalar

  • 00.xlsx
    13.1 KB · Gösterim: 9
  • 09.04.2021.xlsx
    15.1 KB · Gösterim: 9
  • 26.03.2021.xlsx
    15.1 KB · Gösterim: 8
Tarihe göre sırala Oylara göre sırala
Enes Recep BAĞ' Alıntı:
Hiç bir şeyi, sadece excellerinizin tamamını aynı klasör içine atın ve 00.xslm isimli dosyanızı çalıştırın.
Genişletmek için tıkla...
Ama tarihe göre klasörler farklı, yanı 26.03.2021 tarihdekiler aynı isimli klasörde, 09.04.2021 isimli dosyalar aynı isimli klasördeler, bunları karıştıramam.
 
Olumlu oy 0 Negatif oyla
Sayın @nunu446 istediğiniz böyle bir şey mi ?
CSS:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
vaFiles = Array("C:\Users\adn\Downloads\09.04.2021.xlsx", "C:\Users\adn\Downloads\26.03.2021.xlsx") buradadi dosya yolllarını kendinize göre düzeltin
 

Ekli dosyalar

  • 00.xlsm
    27.1 KB · Gösterim: 4
Olumlu oy 0 Negatif oyla
Bence yanlış bir yapı kurduğun için verileri almada da zorluk yaşıyor yaşatıyorsun.
O tarihler sürekli değişecekse ve yeni tarihli dosyalar eklenecekse öncelikle veri tekrarı olmayan bir mimari oluşturmalısın.
Örneğin tüm bu bilgileri excel bir tabloda tutup sonra istediğin bilgilere göre bu firmalara ve tarihlere ait çıktılar üretecek formüller yazabilirsin.
Elbetteki yapmaya çalıştığın işin detayını bilmediğim için net bir yapı öneremiyorum
 
Olumlu oy 0 Negatif oyla
Adnan' Alıntı:
Sayın @nunu446 istediğiniz böyle bir şey mi ?
CSS:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
vaFiles = Array("C:\Users\adn\Downloads\09.04.2021.xlsx", "C:\Users\adn\Downloads\26.03.2021.xlsx") buradadi dosya yolllarını kendinize göre düzeltin
Genişletmek için tıkla...
Merhaba, cevabınız için teşekkür ederim, bunu yaptım ama aşağıdaki hatayı verdi.
 

Ekli dosyalar

  • Ekran şəkli 2021-04-19 113035.jpg
    Ekran şəkli 2021-04-19 113035.jpg
    13.4 KB · Gösterim: 0
Olumlu oy 0 Negatif oyla
Array("C:\Users\User\Desktop\2021.04.23\23.04.2021.xlsm", "C:\Users\User\Desktop\2021.04.09\09.04.2021.xlsm") "................................................."
arasını kendi sayfanızın adresi ile değiştiediniz mi? Bunu kendipcnizdeki sayfanın adresi ile değiştirmelisiniz
 
Olumlu oy 0 Negatif oyla
Adnan' Alıntı:
Array("C:\Users\User\Desktop\2021.04.23\23.04.2021.xlsm", "C:\Users\User\Desktop\2021.04.09\09.04.2021.xlsm") "................................................."
arasını kendi sayfanızın adresi ile değiştiediniz mi? Bunu kendipcnizdeki sayfanın adresi ile değiştirmelisiniz
Genişletmek için tıkla...
Evet değiştirdim. Bu şekilde
 
Olumlu oy 0 Negatif oyla
tekrar denedim ve çalışıyor dosyanızın ismi 2021.04.09\09.04.2021.xlsm" şekildemi Baştaki 2021.04.09 klasör ismi mi.Eğer öyle ise Desktop\2021.04.23\23.04.2021.xlsm çalışması gerekir
 
Son düzenleme:
Olumlu oy 0 Negatif oyla
excel dosya isimlerini el ile yazmaktansa aşağıdaki örnekteki gibi Scripting.FileSystemObject objesi ile o dizinde bulunan istediğiniz uzantılı dosyaların isimlerini alarak işlem yaptırabilirsiniz.

yapacağınız şey aslında

List_Fichiers ThisWorkbook.Path & "\"

şeklinde çağırmak...


C#:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Olumlu oy 0 Negatif oyla
Teşekkür ederim bilgilendirme için. İşin aslı bu kadar zorlamaya gerek yok.
CSS:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
buda aynı işi rahatlıkla yapar. Peki neden böyle yaptın derseniz, burada bu şekilde kullanmamın kendimce sebepleri var.
 
Olumlu oy 0 Negatif oyla
Dosyanızı değiştirdim Ctrl Ye basılı tutarak birden fazla dosyayı seçin
 

Ekli dosyalar

  • 00.xlsm
    27.3 KB · Gösterim: 10
Olumlu oy 1 Negatif oyla
Çözüm
Adnan' Alıntı:
Dosyanızı değiştirdim Ctrl Ye basılı tutarak birden fazla dosyayı seçin
Genişletmek için tıkla...
@Adnan Hocam teşekkür ederim, çalışıyor fakat sıralaması düzgün gitmiyo, aşağıya ekran görüntüsü yükledim. Birde bunu yaptığımda 23.04.2021 tarihli dosyaların fiyatlarını getiriyor, peki 09.04.2021 tarihli dosyaların fiyatının nasıl getiricem?
 

Ekli dosyalar

  • Ekran şəkli 2021-04-20 100912.jpg
    Ekran şəkli 2021-04-20 100912.jpg
    79.3 KB · Gösterim: 7
Olumlu oy 0 Negatif oyla
Aynı anda iki dosyayı ctrl ye basarak seçin ikisinide aynı anda yapsın
 
Olumlu oy 0 Negatif oyla
Olumlu oy 0 Negatif oyla
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

Konuyu okuyanlar

Toplam: 2 (Kullanıcı: 0, Ziyaretçi: 2)
Geri
Üst