• 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ü Tekrar Eden Plakayı Tek Hücreye Yazma

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.

Hsn55

Yeni Üye
Katılım
14 Nis 2021
Mesajlar
837
Çözümler
2
Aldığı beğeni
125
Excel V
Office 2010 TR
Konu Sahibi
İyi günler;
Ekli dosyada M13:M63 hücre aralığında plakaları yazılı araçları R13 hücresine (Her araç tek yazılacak) formül ile aralarına virgül koyarak Taşıma İşleri .......... Plakalı Araçla Yapılmıştır .Eğer Araç sayısı birden fazla ise Taşıma İşleri ................. Araçlarla yapılmıştır. Şeklinde yazdırmak mümkün müdür.

Tek Araç: Taşıma İşleri 55 AED 017 Plakalı Araçla Yapılmıştır.
Birden Fazla Araç : Taşıma İşleri 55 AED 017, 22 FT 090 ,55AEK 907 Plakalı Araçlarla Yapılmıştır.
 
Çözüm
Sayın SNNAY M13:M63 hücre aralığında tek plaka yazılı ise (Aynı plakadan alt alta varsa) Taşıma işleri .... plakalı araç ile yapılmıştır.
M13:M63 hücre aralığında birden fazla plaka varsa( Farklı plaka) Taşıma İşleri ....... Plakalı Araçlarla yapılmıştır. Şeklinde yazacak
Deneyiniz kodu bir modüle ekleyiniz. KTF kullanım için;
R13 hücresine HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
yazınız

HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
  1. Araç plakalarını birleştirmek için bir yardımcı sütun oluşturun:
    İlk olarak, M13:M63 hücre aralığındaki plakaları birleştirerek virgülle ayırmanız gerekecek. Bu işlemi gerçekleştirmek için yeni bir sütun (örneğin N sütunu) kullanabilirsiniz.
    N13 hücresine aşağıdaki formülü yazın ve sütunun aşağısına kadar kopyalayın:

    =EĞERHATA(M13 & ", "; "")

  2. Araç plakalarını tek bir hücrede birleştirin:
    Ardından, tüm plakaları tek bir hücrede birleştirerek virgüllerle ayırın. Bu işlemi bir hücrede (örneğin O1) yapabilirsiniz.
    O1 hücresine aşağıdaki formülü yazın:

    =BİRLEŞTİR(N13:N63)

    Not: Bu formül Excel 365 ve Excel 2019'da çalışır. Daha önceki sürümler için farklı çözümler gerekebilir.
  3. Sonuç metnini oluşturun:
    Son olarak, R13 hücresinde sonucu oluşturmak için bir IF formülü kullanabilirsiniz:
    R13 hücresine aşağıdaki formülü yazın:

    =EĞER(ESAYFAK(O1)=1; "Taşıma İşleri " & KIRP(O1) & " Plakalı Araçla Yapılmıştır."; "Taşıma İşleri " & KIRP(O1) & " Plakalı Araçlarla Yapılmıştır.")
Bu adımlarla, M13:M63 hücre aralığındaki plakaları virgüllerle ayırarak birleştirebilir ve R13 hücresinde doğru formatta görüntüleyebilirsiniz.
 
  1. Araç plakalarını birleştirmek için bir yardımcı sütun oluşturun:
    İlk olarak, M13:M63 hücre aralığındaki plakaları birleştirerek virgülle ayırmanız gerekecek. Bu işlemi gerçekleştirmek için yeni bir sütun (örneğin N sütunu) kullanabilirsiniz.
    N13 hücresine aşağıdaki formülü yazın ve sütunun aşağısına kadar kopyalayın:

    =EĞERHATA(M13 & ", "; "")

  2. Araç plakalarını tek bir hücrede birleştirin:
    Ardından, tüm plakaları tek bir hücrede birleştirerek virgüllerle ayırın. Bu işlemi bir hücrede (örneğin O1) yapabilirsiniz.
    O1 hücresine aşağıdaki formülü yazın:

    =BİRLEŞTİR(N13:N63)

    Not: Bu formül Excel 365 ve Excel 2019'da çalışır. Daha önceki sürümler için farklı çözümler gerekebilir.
  3. Sonuç metnini oluşturun:
    Son olarak, R13 hücresinde sonucu oluşturmak için bir IF formülü kullanabilirsiniz:
    R13 hücresine aşağıdaki formülü yazın:

    =EĞER(ESAYFAK(O1)=1; "Taşıma İşleri " & KIRP(O1) & " Plakalı Araçla Yapılmıştır."; "Taşıma İşleri " & KIRP(O1) & " Plakalı Araçlarla Yapılmıştır.")
Bu adımlarla, M13:M63 hücre aralığındaki plakaları virgüllerle ayırarak birleştirebilir ve R13 hücresinde doğru formatta görüntüleyebilirsiniz.
 
İyi günler;
Ekli dosyada M13:M63 hücre aralığında plakaları yazılı araçları R13 hücresine (Her araç tek yazılacak) formül ile aralarına virgül koyarak Taşıma İşleri .......... Plakalı Araçla Yapılmıştır .Eğer Araç sayısı birden fazla ise Taşıma İşleri ................. Araçlarla yapılmıştır. Şeklinde yazdırmak mümkün müdür.

Tek Araç: Taşıma İşleri 55 AED 017 Plakalı Araçla Yapılmıştır.
Birden Fazla Araç : Taşıma İşleri 55 AED 017, 22 FT 090 ,55AEK 907 Plakalı Araçlarla Yapılmıştır.
Tek araç veya çoklu araçlarla taşındığını nasıl bileceğiz. Kaçıncı satırlardaki araçlarla 1-3-5 mi 2-3-4 mü yoksa rastgele mi seçilecek. Bir koşula göre hedef belirlenmeli ama koşu belli değil. En basitinden Eğer(a1=1;Tekli araçla taşındı;Çoklu araçlarla taşındı) şeklinde bir formül olur.
 
Konu Sahibi
Sayın SNNAY M13:M63 hücre aralığında tek plaka yazılı ise (Aynı plakadan alt alta varsa) Taşıma işleri .... plakalı araç ile yapılmıştır.
M13:M63 hücre aralığında birden fazla plaka varsa( Farklı plaka) Taşıma İşleri ....... Plakalı Araçlarla yapılmıştır. Şeklinde yazacak
 
Sayın SNNAY M13:M63 hücre aralığında tek plaka yazılı ise (Aynı plakadan alt alta varsa) Taşıma işleri .... plakalı araç ile yapılmıştır.
M13:M63 hücre aralığında birden fazla plaka varsa( Farklı plaka) Taşıma İşleri ....... Plakalı Araçlarla yapılmıştır. Şeklinde yazacak
Deneyiniz kodu bir modüle ekleyiniz. KTF kullanım için;
R13 hücresine HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
yazınız

HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Çözüm
Konu Sahibi
Konu Sahibi
Sayın SNNAY hocam araç plakaları sadece Araç sayfası diye bir sayfam var. Bu sayfada m13:m63 hücre aralığında olacak. Makroyu sadece bu sayfa için tanımlama olabilir mi?
 
Sayın SNNAY hocam araç plakaları sadece Araç sayfası diye bir sayfam var. Bu sayfada m13:m63 hücre aralığında olacak. Makroyu sadece bu sayfa için tanımlama olabilir mi?
Makro değil formül için fonksiyondur ; istediğiniz sonucun gelmesini istediğiniz her hangi bir sayfada bir hücreye =AraçlarıBirleştir(M13:M63) yazarsanız sonucu alırsınız eğer verileriniz m13:m63 aralığında değil de x13:x65 aralığına taşınırsa =AraçlarıBirleştir(x13:x65) yazmanız yeterli olur.
 
Sayın Hsn55,
Deneyini. Lütfen dönüş yapınız.
 
Konu Sahibi
Sayın Okan32, Sayın SNNAY ve Sayın Kral desteğiniz için her birinize ayrı ayrı teşekkür ederim.
 
Anlaşılan sizin bilgisayarınızda 2016 versiyon var. Bilgisayarınıza 365 versiyon kuararsanız benim yaptığım formür çalışıyor. Bu en son gönderdiğimi kullanın. Kolay gelsin.
 
Yarın Versiyon 2016 için üzerinde çalışacağım.
 
Deneyiniz. Lütfen dönüş yapınız. 2016 versiyona göre yapılmıştır.
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst