Sut i awtocomplete wrth deipio rhestr ostwng Excel?

Ar gyfer cwymprestr dilysu data gyda llawer o eitemau, mae angen i chi sgrolio i fyny ac i lawr yn y rhestr i ddod o hyd i'r un sydd ei angen arnoch chi neu deipio'r gair cyfan yn y blwch rhestr yn gywir. A oes unrhyw ffordd i wneud y gwymplen yn awto-gwblhau wrth deipio'r nodau cyfatebol? Byddai hyn yn helpu pobl i weithio'n fwy effeithlon mewn taflenni gwaith gyda rhestrau cwymplen mewn celloedd. Mae'r tiwtorial hwn yn darparu dau ddull i'ch helpu chi i'w gyflawni.

Gwnewch restrau cwymplen yn awtolenwi gyda chod VBA
Hawdd gwneud i gwymplenni gael eu cwblhau'n awtomatig mewn 2 eiliad
Mwy o sesiynau tiwtorial ar gyfer y gwymplen ...

Gwnewch restrau cwymplen yn awtolenwi gyda chod VBA

Gwnewch fel a ganlyn i wneud rhestr ostwng yn awtocomplete ar ôl teipio llythrennau cyfatebol yn y gell.

Yn gyntaf, mae angen i chi fewnosod blwch combo yn y daflen waith a newid ei briodweddau.

1. Agorwch y daflen waith sy'n cynnwys y celloedd rhestr gwympo rydych chi am eu gwneud yn awtolenwi.
2. Cyn mewnosod blwch Combo, mae angen i chi ychwanegu'r tab Datblygwr i'r rhuban Excel. Os yw'r tab Datblygwr yn dangos ar eich rhuban, symud i gam 3. Fel arall, gwnewch fel a ganlyn i ddangos y tab Datblygwr yn y rhuban: Cliciwch Ffeil > Dewisiadau i agor y Dewisiadau ffenestr. Yn hyn Dewisiadau Excel ffenestr, cliciwch Rhinwedd Customize yn y cwarel chwith, gwiriwch y Datblygwr blwch, ac yna cliciwch ar y OK botwm. Gweler y screenshot:
   
3. Cliciwch Datblygwr > Mewnosod > Blwch Combo (Rheoli ActiveX).
   
4. Tynnwch lun blwch combo yn y daflen waith gyfredol. De-gliciwch arno ac yna dewiswch Eiddo o'r ddewislen clicio ar y dde.
   
5. Yn y Eiddo blwch deialog, amnewidiwch y testun gwreiddiol yn y (Enw) cae gyda TempCombo.
   
6. Trowch oddi ar y Modd Dylunio trwy glicio Datblygwr > Modd Dylunio.

Yna, cymhwyswch y cod VBA isod

1. De-gliciwch ar y tab dalen gyfredol a chliciwch Gweld y Cod o'r ddewislen cyd-destun. Gweler y screenshot:
   
2. Yn yr agoriad Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, copïwch a gludwch y cod VBA isod i mewn i ffenestr Cod y daflen waith.
   Cod VBA: Yn awtomataidd wrth deipio'r gwymplen

   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

   
3. Pwyswch Alt + Q allweddi ar yr un pryd i gau'r Cymwysiadau Sylfaenol Gweledol Microsoft ffenestr.

O hyn ymlaen, pan gliciwch ar gell rhestr ostwng, bydd y gwymplen yn annog yn awtomatig. Gallwch chi ddechrau teipio'r llythyr i mewn i wneud i'r eitem gyfatebol gael ei chwblhau'n awtomatig mewn cell ddethol. Gweler y screenshot:

Hawdd gwneud y gwymplen yn awtolenwi mewn 2 eiliad

Ar gyfer y rhan fwyaf o ddefnyddwyr Excel, mae'r dull VBA uchod yn anodd ei feistroli. Ond gyda'r Rhestr Gostwng Chwiliadwy nodwedd o Kutools ar gyfer Excel, gallwch yn hawdd alluogi autocomplete ar gyfer dilysu data cwymplenni yn ystod benodol mewn dim ond 2 eiliad. Yn fwy na hynny, mae'r nodwedd hon ar gael ar gyfer pob fersiwn Excel.

Tip: Cyn gwneud cais offeryn hwn, os gwelwch yn dda gosod Kutools ar gyfer Excel yn gyntaf. Ewch i lawrlwytho am ddim nawr.

1. I alluogi awtogwblhau yn eich rhestrau cwymplen, yn gyntaf dewiswch yr ystod gyda'r cwymplenni. Yna, llywiwch i'r Kutools tab, dewis Rhestr Gollwng > Gwneud Chwiliadwy ar y Rhestr Gollwng, Awto-neidlen.
2. Yn y Gwnewch y Rhestr Gwymp yn Chwiliadwy blwch deialog, cliciwch ar y OK botwm i achub y lleoliad.

Canlyniad

Unwaith y bydd y ffurfweddiad wedi'i gwblhau, bydd clicio ar gell rhestr ddisgyn o fewn yr ystod benodedig yn dod â blwch rhestr i fyny. Wrth fynd i mewn i nodau, cyn belled â bod un eitem yn cyfateb yn union, mae'r gair cyfan yn cael ei amlygu ar unwaith yn y blwch rhestr a gellir ei lenwi i mewn i'r gell rhestr gwympo trwy wasgu'r allwedd Enter.

Erthyglau cysylltiedig: