Dosya Bölmede Sıralama Kodu Hk

  • Konuyu başlatan Konuyu başlatan selis
  • Başlangıç tarihi Başlangıç tarihi

selis

Kullanıcı
Katılım
17 Mar 2021
Mesajlar
721
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Herkese merhabalar arkadaşlar ekteki dosyamda dosya bölme işlemi yapıyorum A sütununda yer alan kriterlere göre , buna eklemek istediğim şey dosyaları bölerken "D" sütununda yer alan hiyerarşiye göre bölmesi, ancak her zaman D hücresinde değil bu nedenle UNVAN/İŞ kelimelerini bulunca o sütunda hiyerarşi uygulasın istiyorum nasıl yapabilirim? Hiyerarşi İŞ isimli sayfada yer alıyor. Şimdiden teşekkür ederim.
Şifre : selis
 
Günlük Iş Takibi Haftalık Sefer Ödemesi
Günlük Iş Takibi Haftalık Sefer Ödemesi
Formüldeki Fonksiyonları Ayırma

Ekli dosyalar

Tarihe göre sırala Oylamaya göre sırala
Ayrıca isteğinizi de tam anlayamadım.
Mevcut veriler zaten UNVAN'a göre sıralı gibi görünüyor.

Mevcut sıralamayı karıştırın veya UNVAN sütununda değişiklikler yaparak mevcut sıralamanın yanlış olmasını sağlayın,
ardından da aşağıdaki formülü D2 hücresine uygulayıp aşağı doğru kopyaladıktan sonra
bu formül sonuçlarına göre küçükten büyüğe yapılacak sıralama istenilen şey midir?
Tabi formül önerim asıl çözüm önerisi değildir, sorunun/konunun anlaşılması için belirttiğim uygulamayı yapın bakalım.

Son olarak da bir BÖLME işleminden söz ediyorsunuz, tam olarak bu bölme nedir/nasıl yapılacaktır?
Aynı unvanlar aynı belgeye aktarılarak, yazılı unvan türü adeti kadar yeni belgeler oluşmasını mı istiyorsunuz?

[REPLY]
Kod: 
İndirmek için giriş yapmanız gerekmektedir.
(1 satır)
[/REPLY]
 
Oyla 0 Olumsuz oyla
Hocam şöyle dosyaları böldükten sonra(mdoulenin içinde kodu var sanırım siz yazmıstınız onu da) A hücresine göre örneğin Ankara için alınan verilerde IS/UNVAN yazan sütunu bulup sıralama sayfasındaki dizine göre sıralama yapmasını istiyorum.
 

Ekli dosyalar

Oyla 0 Olumsuz oyla
Umarım yanlış anlamadım.
Mevcut AYIRMA kodunu aşağıdakiyle değiştirin.

Belgenizdeki listede bir SIRA NO sütunu olmadığından,
işlem sırasında sayfadaki verilerde sıralama değişikliği olabileceğini hatırlatayım.
İşlem sonrasında, mevcut listenin orijinal sıralamasına tekrar dönmek istiyorsanız, SIRA NO gibi bir sütun olmalıdır.

[REPLY]
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(33 satır)
[/REPLY]
 
Oyla 0 Olumsuz oyla
1655051047983.webp

Hocam siralamayi yanlış almış, şöyle önce dosyayı bölüp böldükten sonra o dosyada sıralama sayfasındaki sıralamaya göre sıralama yapmasını istiyorum aslında, sadece tek sorun sıralama yapacagı hücre değişken İŞ veya UNVAN yazılı olabilir onu bulması gerekiyor sütunda.
 
Oyla 0 Olumsuz oyla
selis' Alıntı:
1655051047983.webp
Hocam siralamayi yanlış almış, şöyle önce dosyayı bölüp böldükten sonra o dosyada sıralama sayfasındaki sıralamaya göre sıralama yapmasını istiyorum aslında, sadece tek sorun sıralama yapacagı hücre değişken İŞ veya UNVAN yazılı olabilir onu bulması gerekiyor sütunda.
Genişletmek için tıklayın ...
Merhaba sıralama bu şekilde mi olması isteniyor ?
1655062889454.webp
 
Oyla 0 Olumsuz oyla
Yazışmalar karşılıklı olmakla beraber, olan şey diyalog değil monolog sanırım.
3 numaralı cevapta belirttiğim işlemleri uyguladınız mı uygulamadınız mı?

3 numaralı cevapta verdiğim formülü (formüldeki sayfa isminin doğruluğundan emin olun, iki örnek belgedeki sayfa isimleri birbirinden farklı) belirttiğim şekilde uygulayınca alınacak sonuçlar, ilgili unvanın diğer sayfada kaçıncı sırada olduğunu gösterir.

Ardından listeyi bu formül sütununa göre ARTAN sıralayınca SIRALAMA işleminin TAMAM olması gerekir.
Ardından A sütununa şehir adına göre filtre uyguladığınızda göreceğiniz şey de UNVAN sırasına göre o şehrin listesi olacaktır.

Zaten verdiğim MAKRO da; formül, elle sıralama ve filtreleme işlemini belirttiğim şekilde yapıyor, sorun olmaması gerekir.
 
Oyla 0 Olumsuz oyla
Ömer BARAN' Alıntı:
Yazışmalar karşılıklı olmakla beraber, olan şey diyalog değil monolog sanırım.
3 numaralı cevapta belirttiğim işlemleri uyguladınız mı uygulamadınız mı?

3 numaralı cevapta verdiğim formülü (formüldeki sayfa isminin doğruluğundan emin olun, iki örnek belgedeki sayfa isimleri birbirinden farklı) belirttiğim şekilde uygulayınca alınacak sonuçlar, ilgili unvanın diğer sayfada kaçıncı sırada olduğunu gösterir.

Ardından listeyi bu formül sütununa göre ARTAN sıralayınca SIRALAMA işleminin TAMAM olması gerekir.
Ardından A sütununa şehir adına göre filtre uyguladığınızda göreceğiniz şey de UNVAN sırasına göre o şehrin listesi olacaktır.

Zaten verdiğim MAKRO da; formül, elle sıralama ve filtreleme işlemini belirttiğim şekilde yapıyor, sorun olmaması gerekir.
Genişletmek için tıklayın ...
Hocam aşağıdaki dosyalar sizin kodunuzu çalıştırınca oluştu sıralamayı dikkate almıyor, evet verdiğiniz kaçıncı formülü çalışıyordu ama benim kod ile yapmam gerekiyor. Teşekkür ediyorum.
 

Ekli dosyalar

Oyla 0 Olumsuz oyla
selis' Alıntı:
Hocam aşağıdaki dosyalar sizin kodunuzu çalıştırınca oluştu sıralamayı dikkate almıyor, evet verdiğiniz kaçıncı formülü çalışıyordu ama benim kod ile yapmam gerekiyor. Teşekkür ediyorum.
Genişletmek için tıklayın ...
Hocam anladığım kadarıyla soruyorum kod şunu yapıyor mu, DATA sayfasındaki sütunlarda İŞ-İS-UNVAN-ÜNVAN yazısını görünce sıralama sayfasından(bu sıralama sayfasını başka excelede alabiliriz daha kolay olacak ise) eşleştirme yapıp sıralıyor mu? Kodu anlayamadığım için soruyorum hocam. Teşekkür ederim.
 
Oyla 0 Olumsuz oyla
selis' Alıntı:
Hocam anladığım kadarıyla soruyorum kod şunu yapıyor mu, DATA sayfasındaki sütunlarda İŞ-İS-UNVAN-ÜNVAN yazısını görünce sıralama sayfasından(bu sıralama sayfasını başka excelede alabiliriz daha kolay olacak ise) eşleştirme yapıp sıralıyor mu? Kodu anlayamadığım için soruyorum hocam. Teşekkür ederim.
Genişletmek için tıklayın ...
sut1 = Application.Match("*" & "IS" & "*", .[1:1], 0)
Hocam galia burası , ben buraya sut3 sut4 sut5 gibi ikiden fazla tanımlayabilir miyim? Galiba o zaman çözülecek. Bir de büyük küçük harf duyarlılığı var mı hocam yoksa hepsini ayrı mı tanımlamam gerekir? Aşağıdaki gibi hata aldım ben denediğimde hocam. Çok çok teşekkür ederim.
1655116784537.webp
 
Oyla 0 Olumsuz oyla
Anlatımlarınızda çok fazla belirsizlik var.
Örneğin;
-- aktarılacak alan A-D sütun aralığı mıdır,
-- İŞ/UNVAN/POZİSYON vs her neyse bu veri,
her zaman D sütununda mıdır, bu hücrede örneğin İŞ yerine İŞ DURUMU gibi başka kelime de var mıdır emin değilim.
-- son olarak da BÜYÜK/KÜÇÜK HAFR durumundan söz ediyorsunuz.

Özetle belirsizlik üzerine çözüm önerisinde bulunmak sıkıntı.
 
Oyla 0 Olumsuz oyla
Ömer BARAN' Alıntı:
Anlatımlarınızda çok fazla belirsizlik var.
Örneğin;
-- aktarılacak alan A-D sütun aralığı mıdır,
-- İŞ/UNVAN/POZİSYON vs her neyse bu veri,
her zaman D sütununda mıdır, bu hücrede örneğin İŞ yerine İŞ DURUMU gibi başka kelime de var mıdır emin değilim.
-- son olarak da BÜYÜK/KÜÇÜK HAFR durumundan söz ediyorsunuz.

Özetle belirsizlik üzerine çözüm önerisinde bulunmak sıkıntı.
Genişletmek için tıklayın ...
-- aktarılacak alan A-D sütun aralığı mıdır, : Değişken hocam her zaman A-D değil.
-- İŞ/UNVAN/POZİSYON vs her neyse bu veri,
her zaman D sütununda mıdır, bu hücrede örneğin İŞ yerine İŞ DURUMU gibi başka kelime de var mıdır emin değilim. - Hayır her zaman D sütununda değil bu nedenle SÜTUN başlığında UNVAN/Unvan/ÜNVAN/Ünvan ya da İŞ/IS/İş/İS kelimelerinin bulunca sıralama yapmasını istiyorum hocam.
-- son olarak da BÜYÜK/KÜÇÜK HAFR durumundan söz ediyorsunuz. - Büyük küçük harfte aranan sütun değerinden kaynaklı.
 
Oyla 0 Olumsuz oyla
Hocam ben biraz düzenlemeye çalıştım ama yine olmadı.

Ben burda sıralamayı baska bir excelden aldırdım o cok önemli değil öyle olmasa da olur, sıralamaı yapabileyim yeterli :)
 

Ekli dosyalar

Oyla 0 Olumsuz oyla
Burhan.cesur' Alıntı:
İstersen böyle basit bir makro kaydet ile de istediğin veriye ulaşabilirsin.
Genişletmek için tıklayın ...
Yok hocam bu olmaz çünkü sütunlar sabit değil, unvan veya iş yazan sütunu bulup arama yaptırması gerekiyor ayrıca sıralama sayfasında olmayabilir baska excelden de alması gerekıyor ona göre kod yazılması gerek. Emeğiniz için teşekkür ederim.
 
Oyla 0 Olumsuz oyla
Art arda ikinci cevabım olacak.
Yeni durum değişikliği olmayacaksa bu cevaptaki önerim istenilen sonucu verecektir.

Belgenizde mevcut şehir isimlerine göre belgeler oluşturan tüm_data_excele_ayirma isimli makrodaki
If ActiveSheet.AutoFilterMode Then ActiveSheet.AutoFilterMode = False
satırının hemen üstüne Call SIRALAMA şeklinde bir satır ekleyin.

Ardından da şu kodu aynı MODULE içine yapıştırın.
Koddaki aranacak BAŞLIK seçeneklerini, aralarına VİRGÜL koyup ÇİFT TIRNAK arasında yazarak çoğaltabilirsiniz.

Artık normal, eski kodu (bölme) çalıştırdığınızda, listeler sıralanmış hale gelecektir.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(24 satır)
 
Oyla 0 Olumsuz oyla
Yanıt için giriş yapmanız veya üye olmanız gerekir.
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt