Sadece Bazı Kapalı Kitaplarda Veri Alma

[Believing]

Excel Versiyonu

Excel 2016

Excel Sürümü

64 Bit

Excel Dili

Türkçe

Sayın Uzman arkadaşlar,

Aşağıdaki kod ile klasör içerisindeki kapalı kitaplardan veri alıyorum.
Mevcut kodu sadece belli bir kitaptan veri almasını sağlamak için nasıl revize etmeliyim?

Saygılarımla,

Bu kodu görmek için giriş yapmanız gerekmektedir (14 satır). Giriş Yap

 

[Ömer BARAN]

Merhaba @Believing

Koddaki For Each dosya In Crea ...... ve buna bağlı olarak Next satırlarını silip,
If dosya.Name <> ..... satırının hemen üstüne şöyle bir satır ekleyerek istediğinizin olması gerekir.

Bu kodu görmek için giriş yapmanız gerekmektedir (1 satır). Giriş Yap

 

[Believing]

Merhaba Ömer bey,

Yeni bir şeyleri yanlış yapıyorum galiba.
Aslında yapmak istediğim ekteki çalışmadaki gibi olup, dosya biçimlerini koruyarak bu işlemi nasıl gerçekleştirebilirim?

Saygılarımla,

 

[Ömer BARAN]

Cevap yazmıştım ancak ADO konusunda bilgim yeterli olmadığından sonuç alamayabilirsiniz.
Ben sadece mantık yürüterek öneride bulunmuştum.

ADO kodlarıyla verilerin alınabildiğini biliyorum ama biçim konusu hakkında bir fikrim yok doğrusu.

.

 

[Ömer BARAN]

Kodu şu şekilde düzenleyince ben, kodda belirtilen belgeden veri alabildim, bir de böyle deneyin.
Biçim konusuna bir önceki cevapta değinmiştim.
Koddaki belge adı, veri alınacak sayfa adı ve verilerin bulunduğu alan adresine dikkat edin.

Aşağıdaki kodda, veri alınacak belgeyle, verinin yazılacağı belgenin aynı dizinde olduğu varsayıldı.
-- veri alınacak belge : ExcelDestekÖrnek1 (6).xlsm
-- veriler hangi sayfadan alınacak : Sayfa1
-- alınacak verilerin adresi : A1:R50

Bu kodu görmek için giriş yapmanız gerekmektedir (15 satır). Giriş Yap

 

[Believing]

Merhaba Ömer bey,

Şu gece vaktinde yine derdimize ilaç oldunuz.
ALLAH sizden ve sevdiklerinizden razı olsun.
Hakkınızı helal ediniz lütfen.

Saygılarımla,