title: Formatting dates in a combobox dropdown list
body: <p>I have created a simple userform with a combobox populated with a range of dates (<code>rngWeekList</code>) but I am having serious headaches trying to get the list in the dropdown box to appear in "dd-mmm-yy" format. Here is my code:</p>
  
  <pre><code>Private Sub UserForm_Initialize()
  
      ' Populate the list with the date range
      ComboBox1.List = Worksheets("Cover").Range("rngWeekList").Value
  
      ' Set the defulat selection (based off rngWeekIndex)
      ComboBox1.ListIndex = Worksheets("Cover").Range("rngWeekIndex").Value - 1
  
      ' Format
      ComboBox1 = Format(ComboBox1, "dd-mmm-yy")
  
  End Sub
  
  Private Sub ComboBox1_Change()
      ' Format 
      ComboBox1 = Format(ComboBox1, "dd-mmm-yy")
  End Sub
  </code></pre>
  
  <p>This manages to format the selected item in the combobox correctly (e.g. "02-Jul-14") but when I open the dropdown list, all the list entries shown are formatted in the default "m/d/yyyy". Is there a way to change the formatting for the list entries? It is confusing for users who are used to seeing the day before the month.</p>
  
  <p>Thanks in advance for your help, it is much appreciated.</p>
  
  <p>Ed</p>