• 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ü farklı sekmelerden sekmedeki hücre sayısı kadar kopyala yapıştır yapmak

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.
B

blacxtar

Yeni Üye
Katılım
27 Haz 2022
Mesajlar
9
Aldığı beğeni
1
Excel V
Office 2016 TR
Konu Sahibi
Merhaba,

ekteki dosyaya istinaden.

yapmak istediğim şey, FİRMA NO sekmesinden her firma numarasını SKU sekmesindeki dolu satır sayısı kadar ANA VERİ sekmesine kopyalamak ve daha sonrasında SKU sekmesindeki tüm sku sayılarını her firma numarasına kopyala yapıştır yapmak. Ekli dosyadada örneği bulunmakta , umarım anlatabilmişimdir.

Değerli desteklerinizi rica ederim.
 

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.
Çözüm
Refaz
blacxtar' Alıntı:
Çok teşekkürler süper hızlı ve uyum sağladı dosyaya Allah razı olsun. Siz yaptıkca ufkum genişliyorda birşey daha rica edebilirmiyim. :)

aynı formmulun çalıştığı dosyada sadece "Ana veri" sekmesini Dosyaya "Ana veri ismi" vererek tek bir sekme halinde farklı bir dosya olarak dışarıya(Masa üstüne) kaydedebilirmiyiz?
Genişletmek için tıkla...
Alttaki kodu deneyin.

HTML:
Rich (BB code):
İçeriği görebilmek için Giriş yap ya da Üye ol.
Tarihe göre sırala Oylara göre sırala
Konu Sahibi
Refaz' Alıntı:
Alttaki kodu deneyin.

HTML:
Rich (BB code):
İçeriği görebilmek için Giriş yap ya da Üye ol.
Genişletmek için tıkla...
Buda mükemmel çalıştı eline sağlık :)

sadece yazmayı unutmuşum anaveri sekmesindeki A'dan E'ye tüm dolu olan satırların kopyalanmasınıda sağlayabilirmiyiz.

ThisWorkbook.Sheets("ana veri").Copy

birde SpecialFolders("Desktop") & Application.PathSeparator & _

bu koddaki desktop yerine desktopta örneğin abc isimli klasörün içine kopyalatabilirmiyiz.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
halily' Alıntı:
Kullanılan eğer formülünün mantığını anladım sadece 2 kodun birleşmesi kısmi soru işaretli,
başlangıçta veri sayfası boş olacak oraya veriler kodla aktarılacak dolayısıyla H sütunu da boş olacak diye düşünmüştüm
Genişletmek için tıkla...
aslında ben eğer ve düşey arayı birleştirerek bir mantık kurmuştum anaveri sayfasındaki "B" sütünundaki veriyi Raf ömrü d sütünundaki veri ile match ediyor bulduktan sonra eğer "ana veri" sekmesindeki H sütünunda örneğin M1 varsa Raf ömrü sekmesindeki 15. kolona giderek sorgulaa yapıyor eğer M2 ise 17. kolona gidiyor bu şekilde sürekli sıralıyor.

Sağolsun Refaz kardeşim beni tüm formul yığınından ve dosya şişkinliğinden kurtardı Allah razı olsun.
 
Olumlu oy 0 Negatif oyla
blacxtar' Alıntı:
bu koddaki desktop yerine desktopta örneğin abc isimli klasörün içine kopyalatabilirmiyiz
Genişletmek için tıkla...
Rica ederim.

excelAd bunu silip alttakini ekleyin.
HTML:
Rich (BB code):
İçeriği görebilmek için Giriş yap ya da Üye ol.

yani alttaki gibi olmalı normalde yanlışlık yoksa tabii abc klasör yoksa hata verir bunun için koda klasör ekletme eklenebilir.Yaparsam onuda ekleyeyim.

HTML:
Rich (BB code):
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Olumlu oy 0 Negatif oyla
blacxtar' Alıntı:
Buda mükemmel çalıştı eline sağlık :)

sadece yazmayı unutmuşum anaveri sekmesindeki A'dan E'ye tüm dolu olan satırların kopyalanmasınıda sağlayabilirmiyiz.

ThisWorkbook.Sheets("ana veri").Copy

birde SpecialFolders("Desktop") & Application.PathSeparator & _

bu koddaki desktop yerine desktopta örneğin abc isimli klasörün içine kopyalatabilirmiyiz.
Genişletmek için tıkla...
HTML:
CSS:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Refaz' Alıntı:
Rica ederim.

excelAd bunu silip alttakini ekleyin.
HTML:
Rich (BB code):
İçeriği görebilmek için Giriş yap ya da Üye ol.

yani alttaki gibi olmalı normalde yanlışlık yoksa tabii abc klasör yoksa hata verir bunun için koda klasör ekletme eklenebilir.Yaparsam onuda ekleyeyim.

HTML:
Rich (BB code):
İçeriği görebilmek için Giriş yap ya da Üye ol.
Genişletmek için tıkla...
Malesef bu sefer olmadı :(
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Refaz' Alıntı:
24.Mesajdakini deneyin abey.
Genişletmek için tıkla...
Süper bu oldu kardeşim hakkını helal et dosyam biçimlendi sayende birde 21.mesajda bahsettiğim Kopyalamadan önce anaveri sekmesindeki sadece A sütünundan E sütünuna kadar içi dolu satırları kopyalayarak dosyaya atması artık bu son vallahi :(
 
Olumlu oy 0 Negatif oyla
Helal olsun abey.Kodu deneyin.
Olumlu olursa sizin için dosyanın son halinide eklerseniz düzenli olur.

HTML:
JavaScript:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Son düzenleme:
Olumlu oy 0 Negatif oyla
Konu Sahibi
Refaz' Alıntı:
Helal olsun abey.Kodu deneyin.
Olumlu olursa sizin için dosyanın son halinide eklerseniz düzenli olur.

HTML:
JavaScript:
İçeriği görebilmek için Giriş yap ya da Üye ol.
Genişletmek için tıkla...
Kardeşim çok sağol hepsi dosyama uydu ve tam istediğim gibi oldu.

Senden aldığım kodları hep diğer bir dosyaya uyarladım.

Bir firmaya ait olduğu için burada paylaşamıyorum fakat ilk başta paylaştığım veri dosyası üzerinden bir örnek oluşturup buraya atmaya çalışacağım.

Tekrar emeğin iiçin teşekkürler.
 
Olumlu oy 0 Negatif oyla
blacxtar' Alıntı:
Kardeşim çok sağol hepsi dosyama uydu ve tam istediğim gibi oldu.

Senden aldığım kodları hep diğer bir dosyaya uyarladım.

Bir firmaya ait olduğu için burada paylaşamıyorum fakat ilk başta paylaştığım veri dosyası üzerinden bir örnek oluşturup buraya atmaya çalışacağım.

Tekrar emeğin iiçin teşekkürler.
Genişletmek için tıkla...
Rica ederim abey.
Kolay gelsin.
 
Olumlu oy 0 Negatif oyla
Bu arada makrosuz formatta kaydetsin iserseniz excelAd = "Ana veri ismi.xlsx"

HTML:
Rich (BB code):
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Olumlu oy 0 Negatif oyla
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst