• DİKKAT !

    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 Dosya Yükleme tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü Kopyala ve başka dosyaya değerleri yapıştır

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
A

Armara

Yeni Üye
Katılım
22 Eyl 2023
Mesajlar
5
Aldığı beğeni
2
Excel V
Office 2016 EN
Konu Sahibi
Merhaba,
Bir MALZEMELER.xlsx isimli excel çalışma kitabında KALEM, DEFTER, SİLGİ, AJANDA, NOTLAR, KLAVYE, NOTEBOOK, TELEFON, CEP TELEFONU, ZIMBA... gibi yaklaşık 40 tane çalışma sayfası var ve bu çalışma sayfaları birbirinden formüllerle veri almaktadır.
Yapılmak istenen özetle: MALZEMELER isimli excel dosyasında yer alan çalışma sayfaları ile ilgili nasıl bir rapor istenirse o çalışma sayfalarındaki görünen alanları RAPOR isimli excel dosyasına değerler olarak yapıştırarak raporu sunmaktır. Bu amaçla aşağıdaki adımları sırasıyla nasıl yapabilirim?

Şimdi bir vba kodu ile sırasıyla;
1 - MALZEMELER isimli çalışma kitabındaki DEFTER isimli çalışma sayfasında A1: BA250 aralığını kopyala (Sayfada filtreler var, bu nedenle sadece görünen alanı veya yazdırma alanını kopyala diyebiliriz)
2 - Yeni bir excel çalışma kitabı oluştur (C: \RAPORLAR\KIRTASİYE\RAPOR.xlsx)
3 - Yeni çalışma kitabını RAPOR.xlsx olarak adlandır
4 - Kopyalanan aralığı (DEFTER A1:BA250 aralığını) RAPOR isimli dosyada Sayfa1'e (Değerler olarak) yapıştır.
5 - Çalışma sayfasını DEFTER olarak adlandır.
6 - MALZEMELER isimli çalışma kitabındaki DEFTER isimli çalışma sayfasının biçimini kopyala, RAPOR isimli çalışma kitabındaki DEFTER isimli çalışma sayfasına biçim yapıştır.
7 - Dosyayı kaydet.

Sonra;
8 - MALZEMELER isimli çalışma kitabındaki SİLGİ isimli çalışma sayfasını (A8: AR145 aralığını) kopyala
9 - Kopyalanan aralığı (SİLGİ A8: AR145 aralığını) RAPOR isimli dosyada yeni bir çalışma sayfasına (Değerler olarak) yapıştır.
10 - Çalışma sayfasını SİLGİ olarak adlandır.
11 - MALZEMELER isimli çalışma kitabındaki SİLGİ isimli çalışma sayfasının biçimini kopyala, RAPOR isimli çalışma kitabındaki SİLGİ isimli çalışma sayfasına biçim yapıştır.
12 - Dosyayı kaydet.

Yardımlarınız için teşekkür ederim.
 
Çözüm
SNNAY
Armara' Alıntı:
Elinize sağlık, çok güzel olmuş. Ancak iki güncelleme yapabilir miyiz?
1- Tüm sayfalar kopyalanmayacak, sadece kopyalanması istenilen sayfalar kopyalanacak. Bunun için gerekirse Veri adında yeni bir boş sayfa oluşturularak B1 sütununda EVET yazan sayfalar kopyalanabilir, B1 sütununda HAYIR yazan veya boş olan sayfalar kopyalanmaz.
2- Kopyalanan sayfalarda yer alan filtrelere göre kopyalama yaparken aradaki boş satırları da silmeliyiz.
Bu güncellemeleri yapabilir miyiz?
Genişletmek için tıkla...
Deneyiniz. Veri sayfasında A sütununda bulunan sayfa isimlerinin yanında b sütununda bulunan X ile seçim yaparak seçilen sayfaların verilerini RAPOR sayfasına aktarır.
Tarihe göre sırala Oylara göre sırala
Sayın Armara
Bu şekilde sadece derdinizi anlatmış olursunuz. Böyle çözüme ulaşamazsınız. Dosyanızı paylaşmalısınız. Ama dikkat edin, dosyanızın içinde yapmak istediklerinizi manuel örneklerle anlatın ki ne yapmak istediğiniz daha kolay anlaşılsın.
 
Olumlu oy 0 Negatif oyla
Sayın Armara
Makro bilen üstadlarımız size yardımcı olacaklardır. Ben makro bilmem. Ben sadece size dosya paylaşmanız gerektiğini hatırlattım. Zira dosya paylaşmak Forum kurallarından biridir.
 
Olumlu oy 0 Negatif oyla
Ekteki dosyada "C:\Users\user\Downloads\RAPOR.xlsx" ve "C:\Users\user\Downloads\MAZEMELER.xlsx" dosya yollarını kendinize uygun şekilde değiştirin.
MAZEMELER dosyasını açıyor, RAPOR dosyasını eskisi varsa silip yenisini oluşturuyor, kopyalama ve diğer işlemlerden sonra dosyaları kapatıyor
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Olumlu oy 0 Negatif oyla
Armara' Alıntı:
Merhaba,
Bir MALZEMELER.xlsx isimli excel çalışma kitabında KALEM, DEFTER, SİLGİ, AJANDA, NOTLAR, KLAVYE, NOTEBOOK, TELEFON, CEP TELEFONU, ZIMBA... gibi yaklaşık 40 tane çalışma sayfası var ve bu çalışma sayfaları birbirinden formüllerle veri almaktadır.
Yapılmak istenen özetle: MALZEMELER isimli excel dosyasında yer alan çalışma sayfaları ile ilgili nasıl bir rapor istenirse o çalışma sayfalarındaki görünen alanları RAPOR isimli excel dosyasına değerler olarak yapıştırarak raporu sunmaktır. Bu amaçla aşağıdaki adımları sırasıyla nasıl yapabilirim?

Şimdi bir vba kodu ile sırasıyla;
1 - MALZEMELER isimli çalışma kitabındaki DEFTER isimli çalışma sayfasında A1: BA250 aralığını kopyala (Sayfada filtreler var, bu nedenle sadece görünen alanı veya yazdırma alanını kopyala diyebiliriz)
2 - Yeni bir excel çalışma kitabı oluştur (C: \RAPORLAR\KIRTASİYE\RAPOR.xlsx)
3 - Yeni çalışma kitabını RAPOR.xlsx olarak adlandır
4 - Kopyalanan aralığı (DEFTER A1:BA250 aralığını) RAPOR isimli dosyada Sayfa1'e (Değerler olarak) yapıştır.
5 - Çalışma sayfasını DEFTER olarak adlandır.
6 - MALZEMELER isimli çalışma kitabındaki DEFTER isimli çalışma sayfasının biçimini kopyala, RAPOR isimli çalışma kitabındaki DEFTER isimli çalışma sayfasına biçim yapıştır.
7 - Dosyayı kaydet.

Sonra;
8 - MALZEMELER isimli çalışma kitabındaki SİLGİ isimli çalışma sayfasını (A8: AR145 aralığını) kopyala
9 - Kopyalanan aralığı (SİLGİ A8: AR145 aralığını) RAPOR isimli dosyada yeni bir çalışma sayfasına (Değerler olarak) yapıştır.
10 - Çalışma sayfasını SİLGİ olarak adlandır.
11 - MALZEMELER isimli çalışma kitabındaki SİLGİ isimli çalışma sayfasının biçimini kopyala, RAPOR isimli çalışma kitabındaki SİLGİ isimli çalışma sayfasına biçim yapıştır.
12 - Dosyayı kaydet.

Yardımlarınız için teşekkür ederim.
Genişletmek için tıkla...
Deneyiniz; Kodda bulunan
' Kaynak ve rapor dosya yolları
kaynakDosya = "C:\RAPORLAR\KIRTASİYE\MALZEMELER.xlsx"
raporDosya = "C:\RAPORLAR\KIRTASİYE\RAPOR.xlsx"
yukarda yazan yerleri kendi bilgisayarınızda bulunan klasör adı ile değiştiriniz.

HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Olumlu oy 0 Negatif oyla
Sayın Armara dosyanıza baktım, SİLGİ sekmesinden başlayan sayfalarda tarih sütunu yok bir yanlışlık mı var, yoksa başka bir durum mu var bu sayfalar neye göre süzülecek.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Alicimri' Alıntı:
Sayın Armara dosyanıza baktım, SİLGİ sekmesinden başlayan sayfalarda tarih sütunu yok bir yanlışlık mı var, yoksa başka bir durum mu var bu sayfalar neye göre süzülecek.
Genişletmek için tıkla...
Merhaba,
Sayfalardaki filtreler rapor talebine göre değişebiliyor, (Bazen tarih, bazen birim fiyat, bazen tutar.... vb değişebilmektedir) Bu nedenle sayfalardaki veriler göründüğü şekilde kopyalanıp değer olarak yapıştırılması gerekmektedir.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
SNNAY' Alıntı:
Deneyiniz; Kodda bulunan
' Kaynak ve rapor dosya yolları
kaynakDosya = "C:\RAPORLAR\KIRTASİYE\MALZEMELER.xlsx"
raporDosya = "C:\RAPORLAR\KIRTASİYE\RAPOR.xlsx"
yukarda yazan yerleri kendi bilgisayarınızda bulunan klasör adı ile değiştiriniz.

HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
Genişletmek için tıkla...
Elinize sağlık, çok güzel olmuş. Ancak iki güncelleme yapabilir miyiz?
1- Tüm sayfalar kopyalanmayacak, sadece kopyalanması istenilen sayfalar kopyalanacak. Bunun için gerekirse Veri adında yeni bir boş sayfa oluşturularak B1 sütununda EVET yazan sayfalar kopyalanabilir, B1 sütununda HAYIR yazan veya boş olan sayfalar kopyalanmaz.
2- Kopyalanan sayfalarda yer alan filtrelere göre kopyalama yaparken aradaki boş satırları da silmeliyiz.
Bu güncellemeleri yapabilir miyiz?
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Olumlu oy 0 Negatif oyla
Armara' Alıntı:
Elinize sağlık, çok güzel olmuş. Ancak iki güncelleme yapabilir miyiz?
1- Tüm sayfalar kopyalanmayacak, sadece kopyalanması istenilen sayfalar kopyalanacak. Bunun için gerekirse Veri adında yeni bir boş sayfa oluşturularak B1 sütununda EVET yazan sayfalar kopyalanabilir, B1 sütununda HAYIR yazan veya boş olan sayfalar kopyalanmaz.
2- Kopyalanan sayfalarda yer alan filtrelere göre kopyalama yaparken aradaki boş satırları da silmeliyiz.
Bu güncellemeleri yapabilir miyiz?
Genişletmek için tıkla...
Deneyiniz. Veri sayfasında A sütununda bulunan sayfa isimlerinin yanında b sütununda bulunan X ile seçim yaparak seçilen sayfaların verilerini RAPOR sayfasına aktarır.
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Olumlu oy 1 Negatif oyla
Çözüm
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst