Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > EXCEL-Soruları > Excel'e Yeni Başlayanlar
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Excel'e Yeni Başlayanlar Excel kullanmaya yeni başladıysanız sorularınızı buraya gönderebilirsiniz.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 14-10-2017, 20:35   #1
bcomez
 
Giriş: 14/10/2017
Şehir: Osmaniye
Mesaj: 1
Excel Vers. ve Dili:
Office 2016 TÜRKÇE
Varsayılan Rastgele sayıya göre hücre seçme

1-10 arası rastgele üretmiş olduğum bir sayıya göre hücre nasıl seçebilirim. Örneğin A1 den A10 a kadar hücrelerde veri var. B1 hücresinde rastgele sayı üretiyorum ve çıkan sonuca göre A1-A10 arasında hücre seçtirmek istiyorum. Sayı 2 ise B1 hücresinde A2 hücresindeki veri olsun, sayı 5 se B1 hücresinde A5 hücresindeki veri olsun.
Teşekkürler
bcomez Çevrimdışı   Alıntı Yaparak Cevapla
Eski 14-10-2017, 21:51   #2
Necdet Yeşertener
Moderatör
 
Giriş: 04/06/2005
Şehir: Ankara
Mesaj: 11,909
Excel Vers. ve Dili:
Ofis 2003 İngilizce Ofis 2007 Türkçe Ofis 2010 Türkçe
Varsayılan

Merhaba,

Rastgele sayıyı sanırım fonksiyonla üretiyorsunuz.

B1 :

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
=RASTGELEARADA(1;10)
gibi

Fakat B1 hücresindeki bu değişimi makro anlamıyor.
Ancak B1 hücresi içine girip Enter'a bastığınızda ancak anlaşılıyor.

Bu durumda aşağıdaki kodları kullanabilirsiniz, kodları ilgili sayfanın kod bölümüne kopyalamanız gerekir.

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Private Sub Worksheet_Change(ByVal Target As Range)

    If Intersect(Target, [B1]) Is Nothing Then Exit Sub
    
    Range("A" & Cells(1, "B")).Select
    
End Sub
Ne amaçla bu soruyu sordunuz bilmek isterdim.

Doğrudan makro ile de yapmak olası.

Örneğin herhangi bir hücreyi Çit Tıklandığında, Herhangi bir hücreyi seçtiğinizde ya da ilgili sayfaya geldiğinizde Rastgele sayı üretim A sütununda o hücreyi seçtirebilirsiniz.

Ben Çift Tıklama'ya örnek olarak aşağıdaki kodları veriyorum. Size en uygun ne ise onu kullanabilirsiniz.

Selection Change, ya da Activate olaylarına bağlayabilirsiniz kodları.

Kodlar ilgili sayfanın kod bölümünde olmalı

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

    
    Randomize
    Range("B1") = CInt(Int((10 * Rnd()) + 1))
    
    Range("A" & [B1]).Select
    
End Sub
__________________
Sayfada Boş Satırları Silmek:
Sütunu Seçiniz, F5, Özel, Boşluklar, Tamam,
Sağ Klik, Sil, Tüm Satır, Tamam

Türkçe'nin Bir Eksiği Yok, Ya Sizin?



Necdet Yeşertener Çevrimdışı   Alıntı Yaparak Cevapla
Eski 14-10-2017, 22:11   #3
Haluk
Özel Üye
 
Giriş: 07/07/2004
Şehir: Türkiye
Mesaj: 5,083
Excel Vers. ve Dili:
Office 2010 - İngilizce
Varsayılan

B1 hücresine yazacağınız aşağıdaki formül, 1 ile 10 arasında bir rastgele bir sayı üretir ve ürettiği sayıya göre A1 ile A10 arasındaki hücrelerden birinden veri getirir.

Örneğin; üretilen sayı 5 ise A5 hücresini, 8 ise A8 hücresini ..... vb.

Sayfadaki hücrelerden herhangibirinde bir değişiklik olduğunda formül tekrar çalışacaktır.

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
=CHOOSE(RANDBETWEEN(1;10);A1;A2;A3;A4;A5;A6;A7;A8;A9;A10)
Eğer Türkçe Excel kullanıyorsanız, forumda formüllerin İngilizce - Türkçe karşılıklarını içeren mesajlardan faydalanabilirsiniz.

.
__________________
Kod anlatılmaz,yazılır !
Haluk Çevrimiçi   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 12:56


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım - Tarot Falı - invest in turkey - Lingerie - Dyeing Machine - Karton Bardak- Çorlu Özel Eğitim- Site Yönetimi- Led Aydınlatma- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Kırklareli- Pronet Çerkezköy- Pronet Çorlu- Pronet Lüleburgaz- Pronet Keşan- Çorlu Araç Takip- Çorlu Su Arıtma- Boru Profil- Gebze Emlak- Beylikdüzü Temizlik- İstanbul Burun Estetiği- Bakır Sülfat- Rampa- Rotary- Çorlu İnternet Sitesi- youngblood- Çorlu Palet- Çerkezköy Palet- Çorlu Prefabrik- Çorlu Sürücü Kursu- Çorlu Sandviç Panel- Şişli Avukat- Korona Test Kalemi- Çorlu Vinç- Çorlu Pimapen Tamiri- Çorlu Çelik Konstruksiyon-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden