excel - Insert dates in cell from a combobox -


i want insert date in cell form combobox. made button way want, when insert date in cell there in text format. how set value in cell in date format?

private sub userform_initialize()  dim integer  combobox1.list = worksheets(3).range("am3:am13").value  = 0 combobox1.listcount - 1     combobox1.list(i) = format(datevalue(combobox1.list(i)), "dd mmm") next  end sub   private sub combobox1_change()  'nothing here end sub  private sub insertbutton_click()     activecell.value = combobox1.value end sub     

thanks

thanks reply. see what's difference between 2 dates. functions have problem different format , not working correct.

when insert date combobox

when insert date without combobox


Comments

Popular posts from this blog

android - InAppBilling registering BroadcastReceiver in AndroidManifest -

python Tkinter Capturing keyboard events save as one single string -

sql server - Why does Linq-to-SQL add unnecessary COUNT()? -