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

Çözüldü Şehir İsimlerine Göre cirosu ilk seçilecek sıraya göre sayfalara ayırmak

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.

bulentkars

Yeni Üye
Katılım
30 May 2022
Mesajlar
605
Çözümler
5
Aldığı beğeni
104
Excel V
Office 365 TR
Konu Sahibi
Herkese Merhaba,

inputpox gireceğim değere göre şehir ve ciroya göre ciroda (en yüksek 2 ciro ) ve iline göre dağıtacak.
Ekteki tabkloda örnek ile anlattım.
Yardımcı olursanız sevinirim. Şimdiden Teşekkürler
 
İnputbox ile uğraşmayın, Data sayfasında iki adet liste kutusu var.
İlkinden bir şehir seçin, 10 kadar sayı olan liste kutusunda kaç tane aktarmak istiyorsanız, o sayının üzerinde çift tıklayın.
Not= D sütununda büyükten küçüğe sıralanıyor, sorun olacaksa başka bir çözüm arayabiliriz.
Listedeki şehir isimlerine göre sayfalarınızı tamamlayın.
 
Konu Sahibi
Merhaba

sanırım ben yanlış anlattım, benim istediğim İnputbox olmassa bile bri hücreye örneğin "M1" hücresine 2 yazıp makroyu çalıştırdığımda data sayfasındaki tüm şehirleri m1 hücresindeki 2 verisini dikkate alarak sayfalara ayıryacak. M1 E yazacağım rakam ciroda en büyük ilk 3 veya ilk 4 hücreye 8 yazarsam eğer en yüksek cirolu 8 müşteriyi şehir bazlı sayfalara ayıracak.
 
#2 nolu mesajdaki dosyayı güncelledim.
Sayfa adı DİYARBAKIR tablodakiler ise DIYARBAKIR idi düzelttim.
 
Konu Sahibi
Merhaba,
malesef bu olmamış , ekteki dosyada ne yapmak istediğimi örnek ile anlattım. teşekkürler
 
#2 Nolu mesajda eklediğim dosya tamda istediğinizi yapıyor.
Aşağıdaki durumu da belirtmiştim.
Sayfa adı DİYARBAKIR tablodakiler ise DIYARBAKIR idi düzelttim
Ancak son gönderdiğiniz dosyada
listede MARDIN yazıyor sayfa adı MARDİN
listede SIIRT yazıyor sayfa adı SİİRT
listede SIRNAK yazıyor sayfa adı ŞIRNAK
nasıl olmasını bekliyorsunuz.
 
Konu Sahibi
Çalışma kitabında sadece data sayfası olacak.
makro çalıştırıldığında data sayfasındaki şehirler sayfalara ayrılacak.
 
Hazır şehir sayfaları olmayacak, kodlarla hem sayfalar oluşacak, hem de belirttiğiniz sayıda yüksek cirolu veriler aktarılacak.
Böyle bir şey istiyorsunuz, herhalde.
 
Konu Sahibi
Merhaba
Çok teşekkür ederim. Elinize emeğinize sağlık. Tam istediğim gibi olmuş.
sadece aşağıdaki kodu nasıl dinamik yapabiliriz. Yani d209 değişken olduğu için en son satır yapabilirsek çok memnun olurum.
.SetRange Range("A2:D209")
 
Fark etmez istediğiniz kadar satır girebilirsiniz. Dosyadaki kod buna müsait
Merak ettim bu kodu sadece bir defa mı kullanacaksınız.
Tekrar Tekrar kullanacaksanız;
Data sayfasına veri ekleniyor mu
Şehir sayfalarına eklenen veriler saklanacak mı
 
Son düzenleme:
Konu Sahibi
AliCimri Bey
Elinize emeğinize sağlık. Çok teşekkürler.
bu dosyayı tekrar tekrar kullanacağım.
kodun başına data sayfası hariç tüm sayfaları silen kod buldum koydum. Teşekkürle
 
Sayın İbrahim Görgülünün aşağıdaki durumlarda sorun olacağı uyarısı üzerine kodlarda değişiklik yaptım
ANKARAADIYAMANKARAMAN
ANKARAADIYAMANKARABÜK
KARAMANANKARAMANİSA
MUŞÇORUMUŞAK
ANKARAERZİNCANKARAMAN
ANKARAERZİNCANKARABÜK
MUŞERZURUMUŞAK
UŞAKMUŞAKSARAY
ANKARAVANKARAMAN
ANKARAVANKARABÜK
ANKARAKARAMANKARABÜK
ANKARABATMANKARAMAN
ANKARABATMANKARABÜK
ANKARAARDAHANKARAMAN
ANKARAARDAHANKARABÜK
VANYALOVANEVŞEHİR
VANYALOVANİĞDE
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst