I can't seem to find a way to save leading zeros in my Combobox list. The zeros are necessary since they correspond to unique IDs and are formated as text in the worksheet. These unique numbers may appear more than once so I'm using this portion of the form to narrow down my selection. The source for the list is a dynamic named range. Unfortinitly if the leading zero(s) are missing from my selection in the combo box the filterd results for the next section is worthless. It works like a charm for any IDs without a leading zero.
Here's what I have. I'd appreciate any help I can get.
Private Sub UserForm_Initialize()
Dim e As Variant
Dim ws As Worksheet
Set ws = Worksheets("RepairData")
For Each e In SortArray(UniqueValues(ws.Range("SurveyTag_List")))
CB_SurveyTag.AddItem e
Next e
Here's what I have. I'd appreciate any help I can get.
Private Sub UserForm_Initialize()
Dim e As Variant
Dim ws As Worksheet
Set ws = Worksheets("RepairData")
For Each e In SortArray(UniqueValues(ws.Range("SurveyTag_List")))
CB_SurveyTag.AddItem e
Next e