kitap birleştirme

[igultekin2000]

iyi günler, çalışma yapar iken ayrı kitap halinde gelen ekstreleri tek kitapta makro ile birleştirmek istiyorum. aynı çalışma kitabında olduğunda

Sub SayfalariBirlestir()
Dim i As Integer
On Error Resume Next
Sheets(1).Select
Worksheets.Add
Sheets(1).Name = "genel"
Sheets(2).Activate
Range("A1").EntireRow.Select
Selection.Copy Destination:=Sheets(1).Range("A1")
For i = 2 To Sheets.Count
Sheets(i).Activate
Range("A1").Select
Selection.CurrentRegion.Select
Selection.Offset(1, 0).Resize(Selection.Rows.Count - 1).Select
Selection.Copy Destination:=Sheets(1).Range("A65536").End(xlUp)
Next
Sheets("genel").Select
End Sub

makrosu ile tek sayfa haline getirebiliyorum. kitapları makro ile tek kitap haline nasıl getirebilirim. teşekkürler

 

[Asri]

Bu üç program farklı şekillerde işinizi görecektir.

http://asriakdeniz.com/tum-excel-dosyalari-tek-dosyada/

http://asriakdeniz.com/tum-excel-sayfalarini-bir-sayfada-toplama-belirli-bir-sayfa-icin/

http://asriakdeniz.com/tum-excel-dosyalarini-tek-sayfaya-kopyalama/

 

[igultekin2000]

uygulama çok pratik

Bu üç program farklı şekillerde işinizi görecektir.

http://asriakdeniz.com/tum-excel-dosyalari-tek-dosyada/

http://asriakdeniz.com/tum-excel-sayfalarini-bir-sayfada-toplama-belirli-bir-sayfa-icin/

http://asriakdeniz.com/tum-excel-dosyalarini-tek-sayfaya-kopyalama/

bu uygulamalarda diğer çalışmalarınız gibi gayet kullanışlı, sizin yaptığınız uygulamayı kullanıyorum ama biraz ilave yapılırsa daha pratik kullanılır olacaktır, vaktiniz olup bakabilirseniz ekliyorum. teşekkürler

 

[Asri]

bu uygulamalarda diğer çalışmalarınız gibi gayet kullanışlı, sizin yaptığınız uygulamayı kullanıyorum ama biraz ilave yapılırsa daha pratik kullanılır olacaktır, vaktiniz olup bakabilirseniz ekliyorum. teşekkürler

Sayfa biraz karışık geldi.Bilgi alınacak dosyaları da eklerseniz daha anlaşılır olacaktır. KDV bölümlerini ve diğer eklenmiş bilgileri anlayamadım.

 

[igultekin2000]

örnek dosya

Sayfa biraz karışık geldi.Bilgi alınacak dosyaları da eklerseniz daha anlaşılır olacaktır. KDV bölümlerini ve diğer eklenmiş bilgileri anlayamadım.

C2 de yaptığımız seçim onay kutusu şekline getirmek gibi de düşünebiliriz. beyannameler D klasöründe YIL/BEYANNEME TÜRÜ/AY/FİRMA ÜNVANI/AY şeklinde yani B-BEYANNAMELER/2017_BEYANNAME/KDV/01-OCAK/AHMET DURMUS/KDV-01,KDV-02,KDV-03,...... şeklinde gidiyor. burada C2 deki seçimi kullanmadan ONAY KUTUSU işaretleyerek seçimi yapmak.

 

[Asri]

C2 de yaptığımız seçim onay kutusu şekline getirmek gibi de düşünebiliriz. beyannameler D klasöründe YIL/BEYANNEME TÜRÜ/AY/FİRMA ÜNVANI/AY şeklinde yani B-BEYANNAMELER/2017_BEYANNAME/KDV/01-OCAK/AHMET DURMUS/KDV-01,KDV-02,KDV-03,...... şeklinde gidiyor. burada C2 deki seçimi kullanmadan ONAY KUTUSU işaretleyerek seçimi yapmak.

Çok fazla özelleştirme isteniyor
Verdiğiniz dosyalarda birleştirilecek excel dosyaları göremedim. PDF ler mevcut.

 

[igultekin2000]

düzeltme

Çok fazla özelleştirme isteniyor
Verdiğiniz dosyalarda birleştirilecek excel dosyaları göremedim. PDF ler mevcut.

kusura bakmayın, bu ayrı konu, daha önce sizin sunuma koyduğunuz klasörlere toplama, yani dosya birleştirmeden ayrı bir konuydu. toparlarsam tekrar sorarım, teşekkürler.

 

[Asri]

kusura bakmayın, bu ayrı konu, daha önce sizin sunuma koyduğunuz klasörlere toplama, yani dosya birleştirmeden ayrı bir konuydu. toparlarsam tekrar sorarım, teşekkürler.

Evet bende konu ile bağlantı kuramadım. Ben mi yanlış anlaıdım diye düşünüyordum