Excel dosyasından koşula göre veri almak

  • Konuyu başlatan Konuyu başlatan tukayf
  • Başlangıç tarihi Başlangıç tarihi

tukayf

Kullanıcı
Katılım
27 Ocak 2019
Mesajlar
155
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe

Ekli dosyalar

Çözüm
Ömer BARAN
O zaman GÖZAT ekranı gösterip,
bu ekranda da, adında Liste kelimesi geçenleri göstertip,
bu ekranda seçeceğiniz dosyadan veri aldırmak çözüm olur gibi görünüyor.

Durum1:
dosya_isminde_gecen_kelime = "Liste"
kod satırında, veri alınacak kaynak belgenin adında mutlaka yer alan bir kelime varsa
çift tırnak arasına o kelimeyi yazarsınız.

Durum2:
GÖZAT ekranında her zaman hangi klasörün karşınıza gelmesini isterseniz
o klasörün yol bilgisini, Chdir ..... bölümüne çift tırnak arasında yazarsınız.

Veri alınacak belgeyi fareyle seçersiniz işlem biter.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(10 satır)
Tarihe göre sırala Oylamaya göre sırala
@tukayf
Şu kodu kullanabilirsiniz.

Kodun içerisindeki ilk satırda, kaynak dosyanın YOL ve İSMİNİ, kaynak = ...... kısmında kendinize göre düzeltirsiniz.
Ben kodlamada, sonuçların yazılacağı belgeyle, kaynak belgenin aynı DİZİNde olduğunu,
kaynak belgenin adının ExcelDepo-Liste - Kopya.xls olduğunu, kaynak belgedeki verilerin de ilk sayfada olduğunu varsaydım.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(21 satır)
 
Oyla 0 Olumsuz oyla
Merhabalar hocam. Çözüm için çok teşekkürler. Acaba kaynak dosyanın adını belirtmeden veri alma yapamaz mıyız? Çünkü web den her veri indirişte dosya ismi (...) Şeklinde artarak devam ediyor. Sürekli olarak dosya ismi değiştirmek zorunda kalıyoruz. Mümkünatı var mı acaba
 
Oyla 0 Olumsuz oyla
On tane dosya içinden hangisini almak istediğini koda söylemen gerekli. Bunun için bir kriter var mı? Mesela dosya1 dosya2 gibi.. Bu şekilde kriter belirtirsen olabilir.
 
Oyla 0 Olumsuz oyla
okutkan' Alıntı:
On tane dosya içinden hangisini almak istediğini koda söylemen gerekli. Bunun için bir kriter var mı? Mesela dosya1 dosya2 gibi.. Bu şekilde kriter belirtirsen olabilir.
Genişletmek için tıklayın ...
Hocam zaten sıkıntımız o dosya adı net değil. Ama örnek vermek gerekirse izin (1), izin (2).... Artık kaç tane izin dosyası indirebilirsek o kadar sayı artıyor. Şu da yapılabilir izin olsun dosya adı ama veriyi çektikten sonra o dosyayı öldürelim. Tekrar indirdiğimde inerken dosya adı izin olarak gelsin. İzin(1) gibi artarak devam etmesinin önün geçebiliriz o zaman
 
Oyla 0 Olumsuz oyla
İzin(1), izin(2) olarak iniyorsa bu da yeterlidir diye düşünüyorum. Numarası en büyük izin(*) dosyasının içindeki veri çekilebilir.
 
Oyla 0 Olumsuz oyla
okutkan' Alıntı:
İzin(1), izin(2) olarak iniyorsa bu da yeterlidir diye düşünüyorum. Numarası en büyük izin(*) dosyasının içindeki veri çekilebilir.
Genişletmek için tıklayın ...
İlk dosya izin diye iniyor. İndirilenler klasörü silinmediği sürece numara artarak devam edip gidiyor. Yani dosya seçme kutusu gelsi ordan bi dosya seçsek verileri çekemez mi? İlla ki net dosya adı mı vermek lazım
 
Oyla 0 Olumsuz oyla
O zaman GÖZAT ekranı gösterip,
bu ekranda da, adında Liste kelimesi geçenleri göstertip,
bu ekranda seçeceğiniz dosyadan veri aldırmak çözüm olur gibi görünüyor.

Durum1:
dosya_isminde_gecen_kelime = "Liste"
kod satırında, veri alınacak kaynak belgenin adında mutlaka yer alan bir kelime varsa
çift tırnak arasına o kelimeyi yazarsınız.

Durum2:
GÖZAT ekranında her zaman hangi klasörün karşınıza gelmesini isterseniz
o klasörün yol bilgisini, Chdir ..... bölümüne çift tırnak arasında yazarsınız.

Veri alınacak belgeyi fareyle seçersiniz işlem biter.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(37 satır)
 
Oyla 1 Olumsuz oyla
Çözüm
Ömer BARAN' Alıntı:
O zaman GÖZAT ekranı gösterip,
bu ekranda da, adında Liste kelimesi geçenleri göstertip,
bu ekranda seçeceğiniz dosyadan veri aldırmak çözüm olur gibi görünüyor.

Durum1:
dosya_isminde_gecen_kelime = "Liste"
kod satırında, veri alınacak kaynak belgenin adında mutlaka yer alan bir kelime varsa
çift tırnak arasına o kelimeyi yazarsınız.

Durum2:
GÖZAT ekranında her zaman hangi klasörün karşınıza gelmesini isterseniz
o klasörün yol bilgisini, Chdir ..... bölümüne çift tırnak arasında yazarsınız.

Veri alınacak belgeyi fareyle seçersiniz işlem biter.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(37 satır)
Genişletmek için tıklayın ...
Bu şekliyle tamam hocam zihninize sağlık. Çok teşekkürler.
 
Oyla 0 Olumsuz oyla
Yanıt için giriş yapmanız veya üye olmanız gerekir.
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt