excel vba - Filter the list in a combox in vba form as you type -

-

i have problem on how apply filter in combo box , requiry records.

i using combo box named customers contains names of customers (approx 3000) array called settings.customerarray

i want shrink list automatically type text in combo box, idea adapt this method somehow achieve want. not working code looks this, not refresh form correctly.

private sub project_comboboxcustomer_change()     dim e, temp     me         temp = .project_comboboxcustomer.value         if not .project_comboboxcustomer.matchfound             .project_comboboxcustomer.clear             if len(temp)                 each e in cpearson.getcolumnfrom2darray(settings.prosjektcustomerarray, 1)                     if (e <> "") * (e "*" & temp & "*")                         .project_comboboxcustomer.additem e                     end if                 next                 if .project_comboboxcustomer.listcount > 0                     .project_comboboxcustomer.listindex = 0                 end if             end if         end if     end end sub

does have routine similar problem form in vba(i need work both in excel , word, hence using array , not range in excel sheet), or suggestion how can improve current algorithm.

here code getcolumnfrom2darray in case needs it., returns 1 dimensional array 2 dimensional array:

function getcolumnfrom2darray(arr variant, columnnumber long) string()     ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''     ' getcolumn     ' populates resultarr one-dimensional array     ' specified column of arr. existing contents of resultarr     ' destroyed. resultarr must dynamic array.     ' returns true or false indicating success.     ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''     dim rowndx long     dim resultarr() string     ''''''''''''''''''''''''''''''     ' ensure arr array.     ''''''''''''''''''''''''''''''     if isarray(arr) = false         getcolumnfrom2darray = array()         exit function     end if      ''''''''''''''''''''''''''''''''''     ' ensure arr two-dimensional     ' array.     ''''''''''''''''''''''''''''''''''     if numberofarraydimensions(arr) <> 2         getcolumnfrom2darray = array()         exit function     end if       ''''''''''''''''''''''''''''''''''''     ' ensure columnnumber less     ' or equal number of columns.     ''''''''''''''''''''''''''''''''''''     if ubound(arr, 2) < columnnumber         getcolumnfrom2darray = array()         exit function     end if      if lbound(arr, 2) > columnnumber         getcolumnfrom2darray = array()         exit function     end if       redim resultarr(lbound(arr, 1) ubound(arr, 1))     rowndx = lbound(resultarr) ubound(resultarr)         resultarr(rowndx) = arr(rowndx, columnnumber)     next rowndx      getcolumnfrom2darray = resultarr end function


Comments

Post a Comment

Popular posts from this blog

javascript - Chart.js (Radar Chart) different scaleLineColor for each scaleLine -

-
Image
i try , create radar chart using chart.js has various colours each scaleline, or coloured between scalelines. wondering if possible? from: to: i have working graph, though there doesn't seem method change individual scale lines. kind regards leigh you can extend radar chart type this, so chart.types.radar.extend({ name: "radaralt", initialize: function (data) { chart.types.radar.prototype.initialize.apply(this, arguments); var originalscaledraw = this.scale.draw; var ctx = this.chart.ctx; this.scale.draw = function () { var linewidth = this.linewidth; // bypasses line drawing in originalscaledraw this.linewidth = linewidth; originalscaledraw.apply(this, arguments); ctx.linewidth = this.linewidth; var scale = this; // draw chart.helpers.each(scale.ylabels, function (label, index) { // color of ...
Read more

apache - Error with PHP mail(): Multiple or malformed newlines found in additional_header -

-
suddenly have started receiving above error without changes having been made script. host 1and1 (i know...) the script still works fine on different server, , suspicion there must have been server config change has lead this, although hosts plead ignorance. there's no information on above error @ in google can find - have ideas? server running apache if helps. had similar problem. came out of blue. no php code changed. what changed: php upgraded 5.5.25-1 5.5.26. a security risk in php mail() function has been fixed , newlines in additional_headers allowed no more. because newlines mean: starts email message (and surely don't want inject newlines through headers followed evil message). what have worked fine, e.g. having newlines after headers or passing whole message additional_headers , function no more. solution : sanitize headers. no multiple newlines in additional_headers argument. these count "multiple or malformed newlines":...
Read more

java - Android – MapFragment overlay button shadow, just like MyLocation button -

-
Image
i'm struggling add shadow custom overlay button on google map. goal make custom button google's mylocation button. here's how app looks now: layout.xml <relativelayout xmlns:android="http://schemas.android.com/apk/res/android" xmlns:tools="http://schemas.android.com/tools" xmlns:map="http://schemas.android.com/apk/res-auto" android:layout_height="match_parent" android:layout_width="match_parent" style="@style/apptheme"> <fragment android:layout_width="match_parent" android:layout_height="match_parent" android:id="@+id/map" tools:context=".mapsactivity" android:name="com.google.android.gms.maps.supportmapfragment" android:layout_alignparentend="true" android:layout_alignparentstart="true" android:layout_alignparentbottom="true" ...
Read more