• Foruma hoş geldin 👋 Ziyaretçi

    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 tamamen ücretsizdir.

Çözüldü Veri sonuna sıra numarası ekleme

Bu sorun verilen destek sayesinde çözüme ulaştırılmıştır.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

mert25

Yeni Üye
Kullanıcı Bilgileri
Katılım
25 Ağu 2022
Mesajlar
189
Çözümler
1
Aldığı beğeni
29
Excel Versiyonu
Office 2016 TR
Konuyu Başlatan
Forumdaki ustaların yardım ve emekleri ile çok güzel bir dosya çıktı ortaya.

Bir önceki açtığım konuda yardımcı olan arkadaş tablo yapısını değiştir demişti. Fakat bana bu haliyle gerekli. Bu nedenle sorunum tablonun bu haliyle çözülürse çok çok işime yarayacak.

Basketbol sayfasında D ve E sütunlarındaki satırlara takım ekleyip üstteki butona tıklayınca Sub analiz() kodu Y ve Z sütunlarında takımların sonuna sıra numarası ekliyor. Takım Seç butonuna tıklayınca o satırdaki takımlar Ana Sayfada D2 ve E2 satırına aktarılıyor. Sonra takımların son 5 maçlarını getiriyorum.

Sorun şu; Eğer Y ve Z sütunlarındaki takımların sonundaki sıra numarası iki basamaklı ise birler basamağındaki sayıya göre maçlar aktarılıyor. Örneğin 3958. satırda Los Angeles Lakers12 takımı var, D3958 hücresini seçip Takım Seç dediğimde Ana Sayfadaki D sütununa Los Angeles Lakers aktarılıyor ama Maçları Getir dediğimde Los Angeles Lakers2 ye göre maçlar geliyor. Önceki konuda yardımcı olan arkadaş ilgili kodun, takımların sonundaki sıra numarasının en sonundaki sayıya göre işlem yaptığı için böyle olduğunu söyledi.

Benim aklıma şöyle bir şey geldi; Acaba Sub analiz() kodu ile takımların sonuna sıra numarası 1, 2, 3 şeklinde değil de 01, 02, 03 şeklinde verilemez mi? Eğer bu mümkün olursa o zaman takımın sonundaki iki basamaklı sayıya göre takım çağrılınca sorun kalmaz. Excelde bu mümkün olur herhalde. Sorun benim hem yaşım hem de makro bilgim bunu yapmaya imkan vermiyor.

Dosya gerçekten harika oldu, şu sorunda hallolursa mükemmel ötesi olacak. Bu haliyle kalmasına gönlüm razı olmuyor.

Excel ustaları bu soruna bir çözüm bulurlar inşallah.
 

Ekli dosyalar

  • Basket Analiz.xlsm
    787.8 KB · Gösterim: 6
Çözüm
Eğer takımlara verilen numaralar, en fazla 2 haneli oluyorsa modül1 içerisindeki
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
satırlarını aşağıdaki satırlar ile değiştiriniz.
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
satırlarını da aşağıdaki satırlar ile değiştiriniz.
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.


Not: mac_No As Byte tanımlamasını mac_No As Variant olarak değiştiriniz.
Eğer takımlara verilen numaralar, en fazla 2 haneli oluyorsa modül1 içerisindeki
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
satırlarını aşağıdaki satırlar ile değiştiriniz.
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
satırlarını da aşağıdaki satırlar ile değiştiriniz.
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.


Not: mac_No As Byte tanımlamasını mac_No As Variant olarak değiştiriniz.
 
Çözüm
Eğer takımlara verilen numaralar, en fazla 2 haneli oluyorsa modül1 içerisindeki
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
satırlarını aşağıdaki satırlar ile değiştiriniz.
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
satırlarını da aşağıdaki satırlar ile değiştiriniz.
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.


Not: mac_No As Byte tanımlamasını mac_No As Variant olarak değiştiriniz.

Alparslan kardeş harikasın, eline sağlık, tam aradığım işte buydu, dosya şimdi mükemmel oldu.
Dosyanın bu hale gelmesinde emeği geçen tüm arkadaşlara çok çok teşekkür ederim, sağolun, varolun, hepiniz harikasınız.
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

Konuyu okuyanlar

Geri
Üst