Log in  \/ 
x
or
x
Register  \/ 
x

or

How to auto display a default value while deleting value in drop-down list in Excel?

In Excel, you can create a drop-down list for users to select value from the list by using Data Validation. But in some cases, you may want to display a default value such as -select- in the drop down list cell instead of blank while the selected item has been deleted as below screenshot shown. In this article, I introduce a method on solving this job in Excel.
doc defaul value while deleting blank drop down list 1

Auto display a default value while deleting value in drop-down list


Auto display a default value while deleting value in drop-down list

1. Right click at the sheet tab which contain the drop-down list you use, then click View Code in the context menu.
doc defaul value while deleting blank drop down list 1

2. In the popping Microsoft Visual Basic for Applications window, copy and paste below code to the blank script.

VBA: Display default value while deleting selected item in drop down list

Private Sub Worksheet_Change(ByVal Target As Range)
Dim xObjV As Validation
On Error Resume Next
Set xObjV = Target.Validation
If xObjV.Type = xlValidateList Then
 If IsEmpty(Target.Value) Then Target.Value = "-Select-"
End If
End Sub

3. Then save this code. Now after deleting the selected items first time, the default value will be displayed until item is selected in the drop-down list.


The Best Office Productivity Tools

Kutools for Excel Solves Most of Your Problems, and Increases Your Productivity by 80%

  • Reuse: Quickly insert complex formulas, charts and anything that you have used before; Encrypt Cells with password; Create Mailing List and send emails...
  • Super Formula Bar (easily edit multiple lines of text and formula); Reading Layout (easily read and edit large numbers of cells); Paste to Filtered Range...
  • Merge Cells/Rows/Columns without losing Data; Split Cells Content; Combine Duplicate Rows/Columns... Prevent Duplicate Cells; Compare Ranges...
  • Select Duplicate or Unique Rows; Select Blank Rows (all cells are empty); Super Find and Fuzzy Find in Many Workbooks; Random Select...
  • Exact Copy Multiple Cells without changing formula reference; Auto Create References to Multiple Sheets; Insert Bullets, Check Boxes and more...
  • Extract Text, Add Text, Remove by Position, Remove Space; Create and Print Paging Subtotals; Convert Between Cells Content and Comments...
  • Super Filter (save and apply filter schemes to other sheets); Advanced Sort by month/week/day, frequency and more; Special Filter by bold, italic...
  • Combine Workbooks and WorkSheets; Merge Tables based on key columns; Split Data into Multiple Sheets; Batch Convert xls, xlsx and PDF...
  • More than 300 powerful features. Supports Office/Excel 2007-2019 and 365. Supports all languages. Easy deploying in your enterprise or organization. Full features 30-day free trial. 60-day money back guarantee.
kte tab 201905

Office Tab Brings Tabbed interface to Office, and Make Your Work Much Easier

  • Enable tabbed editing and reading in Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
  • Open and create multiple documents in new tabs of the same window, rather than in new windows.
  • Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!
officetab bottom
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.

Be the first to comment.