Çözüldü Verileri Başka Bir Klasördeki Dosyaya Yazdırma

mertatakan3838 · 28 Nis 2020

Değerli üstatlar paylaşmış olduğum çalışmamda personel verilerini tutmaktayım. Yapmak istediğim şey listemin S sütununda bulunan şirket isimlerine göre listeleme yaparak masa üstünde ki LİSTE isimli klasörüme şirket ismi ile listeyi kaydetmek istiyorum. Burada farklı olarak sadece İŞLETME isimli şirketi listeleme yaparken T sütunundaki gruplara ayırarak listeleme yapması ve kaydetmesini istiyorum. Örneğin LİSTE isimli klasöre kaydederken A grubunda çalışan personeli İŞLETME-A, B grubunda çalışan personeli İŞLETME-B, C grubunda çalışan personeli İŞLETME-C, ve İŞLETME-D gibi. Yardımlarınız için şimdiden teşekkürler NOT: Şirket sayısı toplam 13 tür. Ben listeyi uzatmamak için bir kısmı yazdım sadece

Ömer BARAN · 28 Nis 2020

Sayın @mertatakan_3838 .

Örnek belgenizde mevcut verilere göre oluşacak belgeler kaç adettir?
GÜNEŞ_A, GÜNEŞ_B, AKA_A, PARS_B, PARS_D, İŞLETME_C, İŞLETME_B, AKA_B, AKA_D, PARS_A, GÜNEŞ_C, İŞLETME_D
şeklinde midir?

.

mertatakan3838 · 29 Nis 2020

Ömer BARAN' Alıntı:
Sayın @mertatakan_3838 .

Örnek belgenizde mevcut verilere göre oluşacak belgeler kaç adettir?
GÜNEŞ_A, GÜNEŞ_B, AKA_A, PARS_B, PARS_D, İŞLETME_C, İŞLETME_B, AKA_B, AKA_D, PARS_A, GÜNEŞ_C, İŞLETME_D
şeklinde midir?

.

Ömer baran Hocam Oluşacak belgeler şu şekilde olacak İŞLETME-A, İŞLETME-B, İŞLETME-C, İŞLETME-D, DİĞERLERİ İSE GRUP AYRIMI OLMAKSIZIN GÜNEŞ,AKA,PARS ŞEKLİNDE OLACAK. Bu örnek çalışma olduğu için ben 4 şirket ismi ekledim. Bunun haricinde 8 şirket ismi daha var. Onlarda da grup ayrımı olmayacak Ömer hocam.

Feyzullah · 29 Nis 2020

CSS:

You must log in to view content
(32 satır)

mertatakan3838 · 29 Nis 2020

Feyzullah' Alıntı:
CSS:

You must log in to view content (32 satır)

Feyzullah bey makro tam istediğim gibi çalışıyor çok teşekkür ederim. Ancak benim uygulayacağım sayfadaki veri tablosu sayfanın 7. satırından başladığı için kendi sayfama bir türlü uyarlayamadım. Bu konuda yardımcı olursanız sevinirim

Feyzullah · 29 Nis 2020

sorgu kodundaki sayfa adını [KONTROL$A7:T] şeklinde düzeltin, toplamda 3 yerde değiştireceksiniz.

mertatakan3838 · 29 Nis 2020

Feyzullah' Alıntı:
sorgu kodundaki sayfa adını [KONTROL$A7:T] şeklinde düzeltin, toplamda 3 yerde değiştireceksiniz.

Feyzullah hocam kopyalamayıda taplonun üst kısmındaki hücrelerden başlayarak yaptı bu kısımda ne gibi bir değişiklik yapacağız

Feyzullah · 29 Nis 2020

Sheets("kontrol").Copy kodundan sonra aşağıdaki kodu yazın.
Rows("1:6").Delete Shift:=xlUp

mertatakan3838 · 29 Nis 2020

Feyzullah' Alıntı:
Sheets("kontrol").Copy kodundan sonra aşağıdaki kodu yazın.
Rows("1:6").Delete Shift:=xlUp

Feyzullah hocam bu seferde kopyalama yapacağı tabloda üstten 6 satırlık alanı boş bırakıp ondan sonra kopyalama yapıyor

mertatakan3838 · 29 Nis 2020

Feyzullah' Alıntı:
Sheets("kontrol").Copy kodundan sonra aşağıdaki kodu yazın.
Rows("1:6").Delete Shift:=xlUp

bu satırda count 7 yaptım Rows("2:" & Cells(Rows.Count, 7).End(xlUp).Row + 1).ClearContents düzeldi ama bu seferde tablonun başlıkları boş geldi

mertatakan3838 · 29 Nis 2020

Feyzullah' Alıntı:
Sheets("kontrol").Copy kodundan sonra aşağıdaki kodu yazın.
Rows("1:6").Delete Shift:=xlUp

Tamam hocam oldu ben bir yerde oynama yapmışım düzelttim oldu şimdi çok teşekkür ederim

Ömer BARAN · 29 Nis 2020

Merhaba.

ADO, Sayın @Feyzullah 'ın işi.

Ben de başka bir alternatif cevap vereyim. Kodu boş bir MODUL'e yapıştırıp çalıştırın.

Kod yenilendi, 29.04.2020 19:54 .

CSS:

You must log in to view content
(40 satır)

.

mertatakan3838 · 29 Nis 2020

Feyzullah' Alıntı:
Sheets("kontrol").Copy kodundan sonra aşağıdaki kodu yazın.
Rows("1:6").Delete Shift:=xlUp

Feyzullah bey tekrardan merhaba şimdi İŞLETME yi A,B,C,D olarak gruplara ayırırken hiç bir sıkıntı yok listeleme ve kaydetme yapıyor. Ancak İŞLETME kısmına bir grup daha eklesem örneğin grub kısmına İNŞAAT yazsam listeyi boş getiriyor yada Grup kısmına AB yazsam AB yil değil sadece B grubunu getiriyor bire bir eşleştirmede sorun var gibi geldi bana

mertatakan3838 · 29 Nis 2020

Ömer BARAN' Alıntı:
Merhaba.

ADO, Sayın @Feyzullah 'ın işi.
Ben de başka bir alternatif cevap vereyim. Kodu boş bir MODUL'e yapıştırıp çalıştırın.
Kodlar, mevcut örnek belgedeki düzene göre oluşturuldu.

CSS:

You must log in to view content (35 satır)

.

Ömer hocam deneyip dönüş yapacağım size

mertatakan3838 · 29 Nis 2020

Ömer BARAN' Alıntı:
Merhaba.

ADO, Sayın @Feyzullah 'ın işi.
Ben de başka bir alternatif cevap vereyim. Kodu boş bir MODUL'e yapıştırıp çalıştırın.
Kodlar, mevcut örnek belgedeki düzene göre oluşturuldu.

CSS:

You must log in to view content (35 satır)

.

Ömer Hocam 200 satırlık veride denedim Güneş,Pars,AKA gibi grup ayrımı olmayan verileri sıkıntısız alıp kopyalıyor Ancak İŞLETME kısmını gruplara ayırıp kopyalarken Örneğin İŞLETME_A.xls dosyasının içinde her gruptan kaydederek getiriyor

Feyzullah · 29 Nis 2020

mertatakan_3838' Alıntı:
Feyzullah bey tekrardan merhaba şimdi İŞLETME yi A,B,C,D olarak gruplara ayırırken hiç bir sıkıntı yok listeleme ve kaydetme yapıyor. Ancak İŞLETME kısmına bir grup daha eklesem örneğin grub kısmına İNŞAAT yazsam listeyi boş getiriyor yada Grup kısmına AB yazsam AB yil değil sadece B grubunu getiriyor bire bir eşleştirmede sorun var gibi geldi bana

Tek harf olacak şekilde yazmıştım kodu. Gruba isimler olacağını önceden belirtmiş olsaydın keşke neyse gece bakabilirim. Şimdi mobilim.

mertatakan3838 · 29 Nis 2020

Feyzullah' Alıntı:
Tek harf olacak şekilde yazmıştım kodu. Gruba isimler olacağını önceden belirtmiş olsaydın keşke neyse gece bakabilirim. Şimdi mobilim.

Anladım hocam teşekkür ederim Kodu uygulayacağım çalışma makrolarla dolu olduğu için sizin kod KONTROL sayfasının Activate kısmında hata verdi kodlarda çakışma olabilirmi acaba Activate kısmında KONTROL sayfası aktif oldugunda makroları tetiklemek için makro başlıkları var.

Feyzullah · 29 Nis 2020

Sorgu kodundaki Right(rs(0).Value, 1) kodu aşağıdaki ile değiştirip denermisin?

Split(rs(0).value,"-")(1)

mertatakan3838 · 29 Nis 2020

Feyzullah' Alıntı:
Sorgu kodundaki Right(rs(0).Value, 1) kodu aşağıdaki ile değiştirip denermisin?

Split(rs(0).value,"-")(1)

Denedim Subscript out of range hatası verdi kodu eklediğim satırda Feyzullah bey

Ömer BARAN · 29 Nis 2020

Sayın @mertatakan_3838 .

Önceki cevabımdaki kodu güncelledim, sayfayı yenileyerek, kodun yeni halini dener misiniz?

.

M	Çözüldü Verileri Başka Bir Excel Sayfasından Çekme Feyzullah 5 Eki 2018 Excel Makro Soruları
M	Çözüldü Sekmeleri Başka Bir Sayfaya Makro ile Alma Feyzullah 4 Şub 2024 Excel Makro Soruları
G	Çözüldü Aynı Verileri Başka Sayfaya Aktarma orkmesb 11 Haz 2019 Excel Makro Soruları
B	Çözüldü textboxtaki değeri başka bir textboxa getirme berkbaba 15 Tem 2019 Excel Makro Soruları
S	Çözüldü ListViewdeki Verileri Şartlı Olarak Aldırma cakarem 17 Nis 2024 Excel Makro Soruları

Çözüldü Verileri Başka Bir Klasördeki Dosyaya Yazdırma

Normal Üye

Ekli dosyalar

Forum Kurucusu

Normal Üye

Forum Yöneticisi

Ekli dosyalar

Normal Üye

Ekli dosyalar

Forum Yöneticisi

Normal Üye

Forum Yöneticisi

Normal Üye

Normal Üye

Normal Üye

Forum Kurucusu

Normal Üye

Normal Üye

Normal Üye

Forum Yöneticisi

Normal Üye

Forum Yöneticisi

Normal Üye

Forum Kurucusu

Gizliliğinize önem veriyoruz,