Forum Discussion
How to create drop down list but show different values in Excel?
Obviously, you already know how to do data validation as your schedule is full of it. What exactly do you want to return and where? You speak of "an abbreviated word" and "highlighted information in the 2nd page". You mean the yellow cells in columns L:M? The words are exactly the same as in column A (=basis for all your drop-downs). What's the purpose of the sequential number (1-29) in col M?
Perhaps you intend to write abbreviations in L1:L29 and have these displayed in columns B:G on "Sheet1", depending on the selections made. For example, select "Competitive Catalyst" from the drop-down and then return "CompCat". That could be tricky. So, please clarify your intentions.
Obviously, you already know how to do data validation as your schedule is full of it. What exactly do you want to return and where? You speak of "an abbreviated word" and "highlighted information in the 2nd page". You mean the yellow cells in columns L:M? The words are exactly the same as in column A (=basis for all your drop-downs). What's the purpose of the sequential number (1-29) in col M?
Perhaps you intend to write abbreviations in L1:L29 and have these displayed in columns B:G on "Sheet1", depending on the selections made. For example, select "Competitive Catalyst" from the drop-down and then return "CompCat". That could be tricky. So, please clarify your intentions.
ok, this is exactly what I am looking for, For example, select "Competitive Catalyst" from the drop-down and then return "CompCat". I am waiting on the abbreviated words for all of the list in column "L" from my wife and her company. the words as they are, are too long to fit in the cells and when I expand the columns from 6 to 10, it will be really busy on there. they do have abbreviations, I am just waiting on them. I did copy the items on the 2nd page to the yellow part just to show what I am needing ( I will plug in the correct abbreviations once I get it to work correctly. I did stumble across this formula to plug in, and spent hours on it trying to get it to work. I could get it to work on a whole new blank sheet, but I have 0 experience in that. when I did get it to work on a whole new sheet, well then I could not drag it to new cells for copy and paste. thank you for your help.. jason
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20161026
selectedNa = Target.Value
If Target.Column = 5 Then
selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdowna"), 2, False)
If Not IsError(selectedNum) Then
Target.Value = selectedNum
End If
End If
End Sub Riny_van_Eekelen