Note: The other languages of the website are Google-translated. Back to English
Oturum aç  \/ 
x
or
x
Kaydol  \/ 
x

or

Excel açılır listesine yazarken otomatik tamamlama nasıl yapılır?

Büyük öğeler içeren bir veri doğrulama açılır listeniz varsa, yalnızca uygun olanı bulmak için listede yukarı ve aşağı kaydırmanız veya tüm kelimeyi doğrudan liste kutusuna yazmanız gerekir. Açılır listedeki ilk harfi yazarken otomatik tamamlamaya izin verme yöntemi varsa, her şey daha kolay hale gelecektir. Bu eğitim, başarmanıza yardımcı olacak bir VBA yöntemi sağlayacaktır.

VBA kodu ile açılır listeye yazarken otomatik tamamlama
Açılır liste için daha fazla öğretici ...


VBA kodu ile açılır listeye yazarken otomatik tamamlama

Hücreye karşılık gelen harfleri yazdıktan sonra açılır listeyi otomatik tamamlama yapmak için lütfen aşağıdaki işlemleri yapın.

Öncelikle, çalışma sayfasına birleşik giriş kutusu eklemeniz ve özelliklerini değiştirmeniz gerekir.

1. Otomatik tamamlamasını istediğiniz açılır liste hücresini içeren çalışma sayfasını açın.

2. Bir Birleşik giriş kutusu eklemeden önce, Excel şeridine Geliştirici sekmesini eklemeniz gerekir. Geliştirici sekmesi şeridinizde gösteriliyorsa, 3. adıma geç. Aksi takdirde şunları yapın: fileto > Opsiyonlar açmak için Opsiyonlar pencere. Bunda Excel Seçenekleri Pencere, tıklayın Şerit özelleştirme sol bölmede, kontrol edin Geliştirici ve ardından OK buton. Ekran görüntüsüne bakın:

3. tık Geliştirici > Ekle > Birleşik Giriş Kutusu (ActiveX Kontrolü).

4. Mevcut çalışma sayfasında bir açılan kutu çizin. Sağ tıklayın ve ardından seçin İlanlar sağ tıklama menüsünden.

5. içinde İlanlar iletişim kutusu, lütfen orijinal metni değiştirin (Ad) ile alan TempCombo.

6. Kapatın Tasarım Modu tıklayarak Geliştirici > Tasarım Modu.

Ardından, aşağıdaki VBA kodunu uygulayın

7. Geçerli sayfa sekmesine sağ tıklayın ve Kodu Görüntüle bağlam menüsünden. Ekran görüntüsüne bakın:

8. Açılışta Uygulamalar için Microsoft Visual Basic penceresi, lütfen aşağıdaki VBA kodunu çalışma sayfasının Kod penceresine kopyalayıp yapıştırın.

VBA kodu: Açılır listeye yazarken otomatik tamamlama

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Update by Extendoffice: 2020/01/16
    Dim xCombox As OLEObject
    Dim xStr As String
    Dim xWs As Worksheet
    Dim xArr
    
    Set xWs = Application.ActiveSheet
    On Error Resume Next
    Set xCombox = xWs.OLEObjects("TempCombo")
    With xCombox
        .ListFillRange = ""
        .LinkedCell = ""
        .Visible = False
    End With
    If Target.Validation.Type = 3 Then
        Target.Validation.InCellDropdown = False
        Cancel = True
        xStr = Target.Validation.Formula1
        xStr = Right(xStr, Len(xStr) - 1)
        If xStr = "" Then Exit Sub
        With xCombox
            .Visible = True
            .Left = Target.Left
            .Top = Target.Top
            .Width = Target.Width + 5
            .Height = Target.Height + 5
            .ListFillRange = xStr
            If .ListFillRange = "" Then
                xArr = Split(xStr, ",")
                Me.TempCombo.List = xArr
            End If
            .LinkedCell = Target.Address
        End With
        xCombox.Activate
        Me.TempCombo.DropDown
    End If
End Sub
Private Sub TempCombo_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    Select Case KeyCode
        Case 9
            Application.ActiveCell.Offset(0, 1).Activate
        Case 13
            Application.ActiveCell.Offset(1, 0).Activate
    End Select
End Sub

9. Basın Ara Toplam + Q kapatmak için aynı anda tuşları Microsoft Visual Basic Uygulamaları pencere.

Şu andan itibaren, bir açılır liste hücresine tıkladığınızda, açılır liste otomatik olarak sorulacaktır. İlgili öğenin seçili hücrede otomatik olarak tamamlanmasını sağlamak için harfi yazmaya başlayabilirsiniz. Ekran görüntüsüne bakın:

Not: Bu kod, birleştirilmiş hücreler için çalışmaz.

Excel'de onay kutularıyla kolayca açılır liste oluşturun:

The Onay Kutulu Açılır Liste yarar Kutools for Excel ihtiyaçlarınıza göre belirli bir aralıkta, mevcut çalışma sayfasında, mevcut çalışma kitabında veya tüm açık çalışma kitaplarında onay kutuları bulunan açılır listeyi kolayca oluşturmanıza yardımcı olabilir.
Hemen indirin ve deneyin! (30 günlük ücretsiz iz)


İlgili yazılar:

Excel'de birden çok onay kutusu içeren açılır liste nasıl oluşturulur?
Birçok Excel kullanıcısı, her seferinde listeden birden çok öğe seçmek için birden çok onay kutusu içeren açılır liste oluşturma eğilimindedir. Aslında, Veri Doğrulama ile birden çok onay kutusu içeren bir liste oluşturamazsınız. Bu öğreticide, Excel'de birden çok onay kutusu içeren açılır liste oluşturmak için size iki yöntem göstereceğiz. Bu eğitim, sorunu çözme yöntemini sağlar.

Excel'de başka bir çalışma kitabından açılır liste oluşturun
Bir çalışma kitabındaki çalışma sayfaları arasında bir veri doğrulama açılır listesi oluşturmak oldukça kolaydır. Ancak, veri doğrulama için ihtiyacınız olan liste verileri başka bir çalışma kitabında bulunuyorsa, ne yapardınız? Bu öğreticide, Excel'deki başka bir çalışma kitabından açılır listenin nasıl oluşturulacağını ayrıntılı olarak öğreneceksiniz.

Excel'de aranabilir bir açılır liste oluşturun
Çok sayıda değeri olan bir açılır liste için, uygun olanı bulmak kolay bir iş değildir. Daha önce, açılır kutuya ilk harfi girerken otomatik tamamlama açılır listesi için bir yöntem getirmiştik. Otomatik tamamlama işlevinin yanı sıra, açılır listede uygun değerleri bulmada çalışma verimliliğini artırmak için açılır listeyi aranabilir hale de getirebilirsiniz. Açılır listeyi aranabilir hale getirmek için bu eğitimdeki yöntemi deneyin.

Excel açılır listesindeki değerleri seçerken diğer hücreleri otomatik olarak doldurun
B8: B14 hücre aralığındaki değerlere dayalı bir açılır liste oluşturduğunuzu varsayalım. Açılır listeden herhangi bir değeri seçtiğinizde, C8: C14 hücre aralığındaki karşılık gelen değerlerin seçili bir hücrede otomatik olarak doldurulmasını istersiniz. Sorunu çözmek için, bu eğitimdeki yöntemler size bir iyilik yapacaktır.

Açılır liste için daha fazla öğretici ...


En İyi Ofis Üretkenliği Araçları

Kutools for Excel Sorunlarınızın Çoğunu Çözer ve Verimliliğinizi% 80 Artırır

  • Yeniden: Hızlıca yerleştirin karmaşık formüller, grafikler ve daha önce kullandığınız her şey; Hücreleri Şifrele şifre ile; Posta Listesi Oluşturun ve e-posta gönder ...
  • Süper Formül Çubuğu (birden çok metin ve formül satırını kolayca düzenleyin); Okuma Düzeni (çok sayıda hücreyi kolayca okuyun ve düzenleyin); Filtrelenmiş Aralığa Yapıştır...
  • Hücreleri / Satırları / Sütunları Birleştirme Veri kaybetmeden; Bölünmüş Hücre İçeriği; Yinelenen Satırları / Sütunları Birleştirme... Yinelenen Hücreleri Önleyin; Aralıkları Karşılaştır...
  • Yinelenen veya Benzersiz'i seçin Satırlar; Boş Satırları Seçin (tüm hücreler boştur); Süper Bul ve Bulanık Bul Birçok Çalışma Kitabında; Rastgele Seçim ...
  • Tam kopya Formül referansını değiştirmeden Birden Çok Hücre; Otomatik Referans Oluştur Birden Çok Sayfaya; Madde İşaretleri Ekle, Onay Kutuları ve daha fazlası ...
  • Metni Çıkar, Metin Ekle, Konuma Göre Kaldır, Alanı Kaldır; Sayfalama Alt Toplamları Oluşturma ve Yazdırma; Hücre İçeriği ve Yorumları Arasında Dönüştür...
  • Süper Filtre (filtre şemalarını kaydedin ve diğer sayfalara uygulayın); Gelişmiş Sıralama ay / hafta / gün, sıklık ve daha fazlasına göre; Özel Filtre kalın, italik ...
  • Çalışma Kitaplarını ve Çalışma Sayfalarını Birleştirin; Tabloları anahtar sütunlara göre birleştirin; Verileri Birden Çok Sayfaya Bölme; Toplu dönüştürme xls, xlsx ve PDF...
  • 300'den fazla güçlü özellik. Office / Excel 2007-2019 ve 365'i destekler. Tüm dilleri destekler. Kuruluşunuzda veya kuruluşunuzda kolay dağıtım. Tam özellikli 30 günlük ücretsiz deneme. 60 günlük para iade garantisi.
kte sekmesi 201905

Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir

  • Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
  • Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
  • Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!
ofis tabanı
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.