vba - Excel - Multiple selection drop down list - no duplication of selection -


i have developed on excel spreadsheet multiple items can selected in drop down list using following code:

private sub worksheet_change(byval target range)  dim rngdv range dim oldval string dim newval string if target.count > 1 goto exithandler  on error resume next set rngdv = cells.specialcells(xlcelltypeallvalidation) on error goto exithandler  if rngdv nothing goto exithandler  if intersect(target, rngdv) nothing  else   application.enableevents = false   newval = target.value   application.undo   oldval = target.value   target.value = newval     if oldval = ""        else       if newval = ""        else       target.value = oldval _         & ", " & newval        end if     end if end if   exithandler:   application.enableevents = true end sub

but, want validate answers drop down list items can selected once. , preferably, if user selects item again, removed.

any appreciated.

try this:

private sub worksheet_change(byval target range)     const sep string = ", "     dim rngdv range     dim oldval string     dim newval string     dim arr, m, v     if target.count > 1 goto exithandler      on error resume next     set rngdv = target.specialcells(xlcelltypesamevalidation)     on error goto exithandler     if rngdv nothing exit sub      newval = target.value     if len(newval) = 0 exit sub 'user has cleared cell...      application.enableevents = false      application.undo     oldval = target.value      if oldval <> ""         arr = split(oldval, sep)         m = application.match(newval, arr, 0)         if iserror(m)             newval = oldval & sep & newval         else             arr(m - 1) = ""             newval = ""             each v in arr                 if len(v) > 0 newval = newval & iif(len(newval) > 0, sep, "") & v             next v         end if         target.value = newval     end if  exithandler:       application.enableevents = true end sub

Comments

Post a Comment

Popular posts from this blog

authentication - Mongodb revoke acccess to connect test database -

i have ec2 instance mongodb 3.2.0 installed. have user admin access. can connect user , perform operation remotely. 1 can connect database test remote if knows ip mongo 11.11.11.11. although not able make operations, want restrict access user credentials can connect server. first need create users , grant roles users, example: use admin db.createuser( { user: "myuseradmin", pwd: "abc123", roles: [ { role: "useradminanydatabase", db: "admin" } ] } ) then need start server --auth parameter mongod --auth more information here
Read more

r - Update two sets of radiobuttons reactively - shiny -

i have read ( how make choices in radiobuttons reactive in shiny? ) shows me how update radiobutton s in reactive way. however, when try , update 2 sets of buttons same data, 1 set renders. example: server: # create example data wafer <- rep(c(1:3), each=3) length <- c(1,1,2,1,1,1,3,5,1) width <- c(3,1,6,1,1,1,1,1,6) dd <- data.frame(wafer, length, width) shinyserver(function(input, output, session){ # create reactive dataframe store data values <- reactivevalues() values$df <- data.frame() # lengths , widths of wafer user input <- eventreactive(input$do, { subset(dd, wafer %in% input$wafer, select = length:width) }) # update reactive data frame lengths , widths have been selected user input observe({ if(!is.null(a())) { values$df <- rbind(isolate(values$df), a()) } }) output$wl <- renderdatatable({ a() }) # update radio buttons unique length , widths stored in values$df # ever "observe" put first in co...
Read more

ios - Realm over CoreData should I use NSFetchedResultController or a Dictionary? -

i'm working on app using core data , nsfetchedresultcontroller many reasons switch use realm. saw there "realm version" of nsfetchedresultcontroller on github wouldn't compatible current code using core data. the view controller displaying list of people same school, address book. list sublist of people studied in same city. so thinking make 1 unique request database retrieve list of people , filter locally list within 1 dictionary per school [string: anyobject] string section name within tableview , anyobject array of people. first solution, make nsfetchedresultcontroller each school predicate filtering location. delete actions etc.. handled delegates -> not compatible realm create dictionaries , update them each actions... -> works realm it's annoying code. any better solution? edit: i need clarify request: i'd write class inherit uitableviewcontroller. this class has list of people sorted in alphabetical order the tableview has ...
Read more