W przypadku rozwijanej listy sprawdzania poprawności danych zawierającej wiele elementów, musisz przewijać listę w górę iw dół, aby znaleźć tę, której potrzebujesz, lub poprawnie wpisać całe słowo w polu listy. Czy są jakieś metody tworzenia automatycznie uzupełnianej listy rozwijanej podczas wpisywania pierwszej litery lub dowolnych znaków względnych? Pomoże to ludziom wydajniej pracować w arkuszach roboczych z rozwijanymi listami w komórkach. Ten samouczek zawiera dwie metody, które pomogą Ci to osiągnąć.
Autouzupełnianie podczas wpisywania listy rozwijanej z kodem VBA
Autouzupełnianie podczas wpisywania listy rozwijanej za pomocą niesamowitego narzędzia
Więcej samouczków dla rozwijanej listy ...
Wykonaj następujące czynności, aby lista rozwijana była automatycznie uzupełniana po wpisaniu odpowiednich liter w komórce.
1. Otwórz arkusz zawierający rozwijaną listę komórek, dla których chcesz, aby były one automatycznie uzupełniane.
2. Przed wstawieniem pola kombi należy dodać kartę Deweloper do wstążki programu Excel. Jeśli karta Deweloper jest wyświetlana na wstążce, przejdź do kroku 3. W przeciwnym razie wykonaj następujące czynności: Kliknij filet > Opcje otworzyć Opcje okno. W tym Opcje programu Excel okno, kliknij Dostosuj Wstążkę w lewym okienku zaznacz plik Deweloper a następnie kliknij OK przycisk. Zobacz zrzut ekranu:
3. kliknij Deweloper > wstawka > Pole kombi (formant ActiveX).
4. Narysuj pole kombi w bieżącym arkuszu. Kliknij go prawym przyciskiem myszy, a następnie wybierz Właściwości z menu po kliknięciu prawym przyciskiem myszy.
5. w Właściwości W oknie dialogowym zamień oryginalny tekst w (Nazwa) pole z TempCombo.
6. Wyłącz Tryb projektowania klikając przycisk Deweloper > Tryb projektowania.
7. Kliknij prawym przyciskiem myszy bieżącą kartę arkusza i kliknij Wyświetl kod z menu kontekstowego. Zobacz zrzut ekranu:
8. W otwarciu Microsoft Visual Basic for Applications należy skopiować i wkleić poniższy kod VBA do okna kodu arkusza roboczego.
Kod VBA: autouzupełnianie podczas pisania na rozwijanej liście
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. naciśnij inny + Q klawisze jednocześnie, aby zamknąć Aplikacje Microsoft Visual Basic okno.
Odtąd po kliknięciu komórki listy rozwijanej, lista rozwijana wyświetli się automatycznie. Możesz zacząć wpisywać literę, aby odpowiadająca jej pozycja była automatycznie uzupełniana w wybranej komórce. Zobacz zrzut ekranu:
Uwaga: Ten kod nie działa w przypadku scalonych komórek.
Ponieważ VBA jest trudny w obsłudze dla wielu użytkowników Excela, tutaj polecamy Przeszukiwalna lista rozwijana cechą Kutools dla programu Excel aby pomóc Ci łatwo wypełnić listę rozwijaną automatycznie podczas wpisywania pierwszego znaku.
Uwagi: Przed zastosowaniem funkcji upewnij się, że w arkuszu zostały utworzone listy rozwijane. W takim przypadku listy rozwijane są umieszczane w D3:D9.
1. kliknij Kutools > Lista rozwijana > Przeszukiwalna lista rozwijana > Ustawienia.
2. W wyskakującym okienku Przeszukiwalna lista rozwijana W oknie dialogowym należy wprowadzić następujące ustawienia.
3. Po zakończeniu ustawień musisz włączyć tę funkcję, klikając Kutools > Lista rozwijana > Przeszukiwalna lista rozwijana > Włącz listę rozwijaną z możliwością wyszukiwania.
Teraz, po kliknięciu komórki listy rozwijanej, wyświetlane jest pole listy ze wszystkimi elementami. Wystarczy wpisać znak w polu tekstowym, aby wyświetlić wszystkie odpowiadające mu elementy i użyć Up or W dół strzałkę, aby wybrać żądany element lub po prostu pozwól pierwszemu pasującemu elementowi automatycznie wypełnić pole listy, a następnie naciśnij wchodzić klawisz, aby automatycznie uzupełnić komórkę listy rozwijanej pasującym elementem. Zobacz poniższe demo.
Kliknij, aby dowiedzieć się więcej o tej funkcji.
Jeśli chcesz mieć bezpłatny okres próbny (30-dniowy) tego narzędzia, kliknij, aby go pobrać, a następnie przejdź do wykonania operacji zgodnie z powyższymi krokami.
Jak utworzyć listę rozwijaną z wieloma polami wyboru w programie Excel?
Wielu użytkowników programu Excel ma tendencję do tworzenia listy rozwijanej z wieloma polami wyboru, aby wybrać wiele pozycji z listy na raz. W rzeczywistości nie można utworzyć listy z wieloma polami wyboru z funkcją Walidacja danych. W tym samouczku pokażemy dwie metody tworzenia rozwijanej listy z wieloma polami wyboru w programie Excel. W tym samouczku przedstawiono metodę rozwiązania problemu.
Utwórz listę rozwijaną z innego skoroszytu w programie Excel
Utworzenie listy rozwijanej sprawdzania poprawności danych w arkuszach roboczych w skoroszycie jest dość łatwe. Ale jeśli lista danych potrzebnych do weryfikacji danych znajduje się w innym skoroszycie, co byś zrobił? W tym samouczku dowiesz się, jak szczegółowo utworzyć listę rozwijaną z innego skoroszytu w programie Excel.
Utwórz listę rozwijaną z możliwością wyszukiwania w programie Excel
W przypadku listy rozwijanej z wieloma wartościami znalezienie odpowiedniej nie jest łatwą pracą. Wcześniej wprowadziliśmy metodę automatycznego uzupełniania listy rozwijanej po wpisaniu pierwszej litery w rozwijanym polu. Oprócz funkcji autouzupełniania, możesz również umożliwić przeszukiwanie listy rozwijanej, aby zwiększyć wydajność pracy w znajdowaniu odpowiednich wartości na liście rozwijanej. Aby umożliwić przeszukiwanie listy rozwijanej, wypróbuj metodę opisaną w tym samouczku.
Automatycznie wypełniaj inne komórki podczas wybierania wartości na liście rozwijanej programu Excel
Załóżmy, że utworzyłeś listę rozwijaną na podstawie wartości w zakresie komórek B8: B14. Po wybraniu dowolnej wartości z listy rozwijanej chcesz, aby odpowiednie wartości w zakresie komórek C8: C14 były automatycznie wypełniane w wybranej komórce. Aby rozwiązać problem, skorzystaj z metod przedstawionych w tym samouczku.
