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

python Tkinter Capturing keyboard events save as one single string -

android - InAppBilling registering BroadcastReceiver in AndroidManifest -

javascript - Z-index in d3.js -