Cum se afișează primul element din lista derulantă în loc de gol?

Lista derulantă dintr-o foaie de lucru ne poate ajuta să facilităm introducerea datelor, trebuie doar să selectăm articolele fără să le tastăm unul câte unul. Dar, cândva, când faceți clic pe lista derulantă, acesta trece mai întâi la elementele goale în loc de primul element de date, după cum se arată în următoarea captură de ecran, acest lucru poate fi cauzat de ștergerea datelor sursă la sfârșitul listei. Poate fi enervant faptul că trebuie să derulați înapoi la începutul unei liste lungi pentru fiecare celulă de validare a datelor necompletate. În acest articol, voi vorbi despre cum să afișați întotdeauna primul element din lista derulantă.

Afișați primul element din lista derulantă în loc de gol cu ​​funcția Validare date

Afișați automat primul element din lista derulantă în loc de gol cu ​​codul VBA

Afișați primul element din lista derulantă în loc de gol cu ​​funcția Validare date

De fapt, pentru a realiza acest job, trebuie doar să aplicați o formulă specifică atunci când creați o listă derulantă, vă rugăm să faceți următoarele:

1. Selectați celulele în care doriți să inserați lista derulantă și faceți clic pe Date > Data validarii > Data validarii, vezi captura de ecran:

2. În pop-out Data validarii caseta de dialog, sub Setări cont fila, alegeți Listă de la Permite , apoi introduceți această formulă: = OFFSET (Sheet3! $ A $ 1,0,0 $, COUNTA (Sheet3! $ A: $ A) -1,1) în Sursă casetă text, vezi captura de ecran:

notițe: În această formulă, Sheet3 este foaia de lucru conține lista de date sursă și A1 este prima valoare a celulei din listă.

3. Apoi apasa OK butonul, acum, când faceți clic pe celulele din lista derulantă, primul element de date este afișat întotdeauna în partea de sus, indiferent dacă există valori ale celulei șterse la sfârșitul datelor sursă, consultați captura de ecran:

Afișați automat primul element din lista derulantă în loc de gol cu ​​codul VBA

Aici pot introduce, de asemenea, un cod VBA care vă poate ajuta să afișați automat primul element din lista verticală atunci când faceți clic pe celulele de validare a datelor.

1. După inserarea listei derulante, selectați fila Foaie de lucru care conține lista derulantă și faceți clic dreapta pentru a alege Afișați codul din meniul contextual pentru a accesa Microsoft Visual Basic pentru aplicații , apoi copiați și lipiți următorul cod în modul:

Cod VBA: Afișează automat primul element de date în lista derulantă:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice 20160725
    Dim xFormula As String
    On Error GoTo Out:
    xFormula = Target.Cells(1).Validation.Formula1
    If Left(xFormula, 1) = "=" Then
        Target.Cells(1) = Range(Mid(xFormula, 1)).Cells(1).Value
    End If
Out:
End Sub

2. Apoi salvați și închideți fereastra de cod și acum, când faceți clic pe celula din lista derulantă, primul element de date va fi afișat simultan.