Hi Matt, That's Great. We're our best teachers. Kudos :)
________________________________________ Thanks & Regards Ashish Jain McKinsey India Knowledge Center (Microsoft Certified Application Specialist) (Microsoft Certified Professional) http://www.excelitems.com http://www.openexcel.com ________________________________________ On Nov 4, 11:01 pm, RemyMaza <remym...@gmail.com> wrote: > I ended up fixing this by using a filter on my array: > > 'ReDim arrDeviceNames() to trim the "EMPTY DEVICE" > arrNonEmptyDeviceNames = Filter(arrDeviceNames, "EMPTY DEVICE", > False) > > Thanks guys, > Matt > > On Nov 3, 9:13 am, RemyMaza <remym...@gmail.com> wrote: > > > > > > > > > I have an array of values that come in off of a form. One of these > > values is "Empty Device". Here's the code I'm using to handle that: > > > Devices = Array(cmb1.Value, cmb2.Value, cmb3.Value, cmb4.Value, > > cmb5.Value, cmb6.Value, cmb7.Value) > > > Now that I have my Devices array, I loop through the number of devices > > that were selected and assign values to other variables and another > > array. Here's some of that code: > > > For i = 0 To UBound(Devices) > > If Not Devices(i) = "" Then NumOfDevices = NumOfDevices + 1 > > If Devices(i) = "EMPTY DEVICE" Then NumOfEmptyDevices = > > NumOfEmptyDevices + 1 > > 'Match Description to Ganged > > Select Case True > > Case Devices(i) = "EMPTY DEVICE" > > Ganged = Ganged & "X " > > ReDim Preserve arrDeviceName(0 To i) > > arrDeviceName(i) = "EMPTY DEVICE" > > > Case Devices(i) = "20A RECEPTACLE" > > Ganged = Ganged & "O " > > ReDim Preserve arrDeviceName(0 To i) > > arrDeviceName(i) = "D20120" > > > Case Devices(i) = "20A GFI" > > Ganged = Ganged & "G " > > ReDim Preserve arrDeviceName(0 To i) > > arrDeviceName(i) = "G20120" > > > I need to find out a way to handle "EMPTY DEVICES". Later on in the > > code, I loop through the TotalNumOfDevices which equals all of the > > devices picked except for "EMPTY DEVICE". That throws off my looping, > > because the numbers aren't ever equal when these are chosen. How > > would I dip into the arrDeviceName array and trim out all of the > > "EMPTY DEVICES". Better yet, would be how to keep "EMPTY DEVICE" from > > even getting into the arrary. Currently, when I comment out the ReDim > > statment for "EMPTY DEVICE", I still get a value of "" within my > > array. This essentially is throwing off the whole calculation. > > > I'd appreciate any input! > > Cheers, > > Matt -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts
