Salt la conținutul principal

Cum se setează / se afișează valoarea preselectată pentru lista derulantă în Excel?

În mod implicit, lista verticală generală pe care ați creat-o este afișată necompletată înainte de a alege o valoare din listă, dar, în unele cazuri, poate doriți să afișați sau să setați o valoare preselectată / valoarea implicită pentru lista verticală înainte ca utilizatorii să selecteze una din se afișează lista ca captură de ecran de mai jos. Aici acest articol vă poate ajuta.

doc afișează lista derulantă a valorii preselectate 1
Setați valoarea implicită (valoare preselectată) pentru lista derulantă cu formulă

săgeată albastru dreapta balon Setați valoarea implicită (valoare preselectată) pentru lista derulantă cu formulă

Pentru a seta valoarea implicită pentru lista verticală, trebuie mai întâi să creați o listă verticală generală, apoi să utilizați o formulă.

1. Creați o listă derulantă. Selectați o celulă sau un interval pe care doriți să plasați lista derulantă, aici este K1 și faceți clic Date > Data validarii. Vedeți captura de ecran:
doc afișează lista derulantă a valorii preselectate 2

2. Apoi în Data validarii dialog, sub setări cont , selectați Listă din Permite , apoi selectați valoarea pe care doriți să o afișați în lista derulantă Sursă casetă de text. Vedeți captura de ecran:
doc afișează lista derulantă a valorii preselectate 3

3. Apoi apasa Alertă de eroare filă din Data validarii dialog și debifați Afișați alerta de eroare după introducerea datelor nevalide opțiune. vezi captura de ecran:
doc afișează lista derulantă a valorii preselectate 4

4. clic OK pentru a închide dialogul și accesați lista derulantă și tastați această formulă = IF (J1 = "", "--select--") în el și apăsați Intrați cheie. Vedeți captura de ecran:
doc afișează lista derulantă a valorii preselectate 5

Sfat: În formulă, J1 este o celulă goală lângă K1, asigurați-vă că celula este goală și "--Selectați--"este valoarea preselectată pe care doriți să o afișați și le puteți schimba după cum aveți nevoie.

5. Apoi țineți selectată celula din lista derulantă și faceți clic Date > Data validarii a arăta Data validarii dialog din nou și accesați Alertă de eroare și verificați Afișați alerta de eroare după introducerea datelor nevalide opțiune înapoi. Vedeți captura de ecran:
doc afișează lista derulantă a valorii preselectate 6

7. clic OK, acum, înainte ca utilizatorii să selecteze valori din lista derulantă, există o valoare implicită afișată în celula specificată cu lista derulantă.
doc afișează lista derulantă a valorii preselectate 7

Notă: În timp ce o valoare este selectată din lista derulantă, valoarea implicită dispare.
doc afișează lista derulantă a valorii preselectate 8

Cele mai bune instrumente de productivitate de birou

🤖 Kutools AI Aide: Revoluționați analiza datelor pe baza: Execuție inteligentă   |  Generați codul  |  Creați formule personalizate  |  Analizați datele și generați diagrame  |  Invocați funcțiile Kutools...
Caracteristici populare: Găsiți, evidențiați sau identificați duplicatele   |  Ștergeți rândurile goale   |  Combinați coloane sau celule fără a pierde date   |   Rundă fără Formula ...
Super căutare: VLookup cu mai multe criterii  |   VLookup cu valori multiple  |   VLookup pe mai multe foi   |   Căutare fuzzy ....
Listă derulantă avansată: Creați rapid o listă derulantă   |  Listă drop-down dependentă   |  Listă derulantă cu selectare multiplă ....
Manager de coloane: Adăugați un număr specific de coloane  |  Mutați coloanele  |  Comutați starea vizibilității coloanelor ascunse  |  Comparați intervale și coloane ...
Caracteristici prezentate: Focus pe grilă   |  Vedere de proiectare   |   Big Formula Bar   |  Manager registru de lucru și foi   |  Biblioteca de resurse (Text automat)   |  Data Picker   |  Combinați foi de lucru   |  Criptare/Decriptare celule   |  Trimiteți e-mailuri după listă   |  Super Filtru   |   Filtru special (filtrează bold/italic/barat...) ...
Top 15 seturi de instrumente:  12 Text Instrumente (Adăuga text, Eliminați caractere,...)   |   50+ Diagramă Tipuri de (Gantt Chart,...)   |   40+ Practic Formule (Calculați vârsta pe baza zilei de naștere,...)   |   19 inserare Instrumente (Introduceți codul QR, Inserați imaginea din cale,...)   |   12 Convertire Instrumente (Numere la cuvinte, conversie valutara,...)   |   7 Merge & Split Instrumente (Rânduri combinate avansate, Celule divizate,...)   |   ... și altele

Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp.  Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...

Descriere

Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

  • Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
  • Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
  • Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
Comments (15)
No ratings yet. Be the first to rate!
Arun
Arun
This comment was minimized by the moderator on the site
Hi,

How to count (D71) conditionally formatted RED color cell (D40:D70)?

Pls guide...

Thanks.
Reply
0
0
Arun
Arun
This comment was minimized by the moderator on the site
Hi,

How to make default value (UP) for certain range of column (C40:C70) only in the below code? Add what command?

Private Sub Worksheet_Change(ByVal Target As Range)
‘Updated by ARUN
Dim xObjV As Validation
On Error Resume Next
Set xObjV = Target.Validation
If xObjV.Type = xlValidateList Then
If IsEmpty(Target.Value) Then Target.Value = “UP”
End If
End Sub

Pls guide…

Thanks.
Reply
0
0
Sunny
Sunny     Arun
This comment was minimized by the moderator on the site
Try this code
Private Sub Worksheet_Change(ByVal Target As Range)
    'Updated by ExtendOffice
    Dim xObjV As Validation
    On Error Resume Next
    Set xObjV = Target.Validation
    
    'Check if the target is within C40:C70
    If Not Intersect(Target, Range("C40:C70")) Is Nothing Then
        If xObjV.Type = xlValidateList Then
            If IsEmpty(Target.Value) Then Target.Value = "UP"
        End If
    End If
End Sub
Reply
Report
0
0
Arun
Arun     Sunny
This comment was minimized by the moderator on the site
Hi,

Its working...

Thanks
Reply
0
0
Asad Shah
Asad Shah
This comment was minimized by the moderator on the site
Hello, How can I get defined value limit in excel dropdown menu, like I want to Enter Apple in product against three name and it should not put 4th entry and give error if i do so, any solution please.
Reply
Report
0
0
Sunny
Sunny     Asad Shah
This comment was minimized by the moderator on the site
Sorry, I do not understand your question, could you describe with more details or upload a file to describe it?
Reply
Report
0
0
Asad
Asad
This comment was minimized by the moderator on the site
Hello, How can I get defined value limit in excel dropdown menu, like I want to Enter Apple in product against three name and it should not put 4th entry and give error if i do so, any soluition please.
Reply
0
0
miradek
miradek
This comment was minimized by the moderator on the site
hello, my data is about names and phone numbers. can make it if two names selected in one cells using data validations, the particular name which their name as selected, their phone numbers will be shown next to it.

help me!
Reply
0
0
JStirfry
JStirfry
This comment was minimized by the moderator on the site
Hello!

How can I set a data validation list such that if the drop down value in the cell is deleted, the cell will automatically show a default value (i.e. "-Select-")?

For example, I have a worksheet with multiple drop down lists that I want to show a default value of "-Select-" once the sheet is opened. A user will select values from the lists that will impact the result of calculations throughout the entire spreadsheet. A user may accidentally "delete" the cell contents of the lists. If this happens, rather than the cell becoming blank, I want the cell to show a default value of "-Select-". This scenario occurs in multiple random locations throughout the spreadsheet, not just in one localized place.

I was able to find the following VBA code so far, but it only applies the concept over a range, rather than just individual cells that contain drop down lists. The problem with what I have coded so far is that every single blank cell in the range ends up with "-Select-" in it. Some of the lists are in ranges, but some are also scattered throughout the sheet. The problem I'm having with my current code is that every single blank cell in the range ends up with "-Select-" in it. I'm trying to get this to apply over the entire worksheet to ONLY cells that are drop down lists.

Is what I'm trying to accomplish even possible?

Example file can be found here:
https://drive.google.com/file/d/1VoO8VgFs3IJ0ALwqfk0i8gt69UE4vEKW/view?usp=sharing

Example code:

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Dim cel As Range
' If Target.Cells.Count > 1 Then Exit Sub 'turning this off allows multiple cells to be selected and deleted at the same time
If Not Intersect(Target, Range("f2:p17")) Is Nothing Then
For Each cel In Range("f2:p17")
Application.EnableEvents = False
If IsEmpty(cel.Value) Then cel.Value = "-Select-"
Next cel
End If
Application.EnableEvents = True
End Sub


Thanks in advance!
Reply
Report
0
0
Justin
Justin
This comment was minimized by the moderator on the site
How can I set a data validation list such that if the drop down value in the cell is deleted, the cell will automatically show the a default value (i.e. "-Select-")?

For example, I have a worksheet with multiple drop down lists that I want to show a default value of "-Select-" once the sheet is opened. A user will select values from the lists that will impact the result of calculations throughout the entire spreadsheet. A user may accidentally "delete" the cell contents. If this happens, rather than the cell becoming blank, I want the cell to show a default value of "-Select-". This scenario occurs in multiple random locations throughout the spreadsheet, not just in one localized place.

I was able to come up with the following VBA code so far, but I've only figured out how to apply the concept over a range, rather than just cells that contain a drop down list. The problem with what I have coded so far is that every single blank cell in the range ends up with "-Select-" in it.

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Dim cel As Range
' If Target.Cells.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("f2:p17")) Is Nothing Then
For Each cel In Range("f2:p17")
Application.EnableEvents = False
If IsEmpty(cel.Value) Then cel.Value = "-Select-"
Next cel
End If
Application.EnableEvents = True
End Sub
Reply
0
0
Dary
Dary
This comment was minimized by the moderator on the site
The idea is nice, but my problem is that if the dropdown value is deleted, it doesn't revert to the default.
Reply
0
0
zaid
zaid     Dary
This comment was minimized by the moderator on the site
I also have the same issue , please reply if you solved it
Reply
0
0
Scott
Scott     Dary
This comment was minimized by the moderator on the site
Exactly!!! I'm having the same issue, have you found a solution?
Reply
0
0
Alex
Alex     Scott
This comment was minimized by the moderator on the site
You can insert the function in that specific cell using VBA, make sure you call the insert function when workbook is opening.
Reply
0
0
Elizabeth Taylor
Elizabeth Taylor     Alex
This comment was minimized by the moderator on the site
Only works if you speak VBA, not all of us code.
Reply
0
0
There are no comments posted here yet
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations