Filling All Elements Of A Two Dimensional Array?

Dec 3, 2009

Filling all elements of a two dimensional array?. I know that I could write something like:

View 3 Replies


ADVERTISEMENT

Creating A 2-dimensional Array From A 1-dimensional List

Nov 27, 2008

I've been a lurker on this forum for a long while and it's always been able to provide me with lots of excel tips, and for that I am grateful! But this time I have a question that I can't find the answer to here, or anywhere else on the web after a few hours of looking. As a note, I'm not very experienced with Excel, probably somewhere between novice and intermediate.

What I need to create is a 2-dimensional array of data. The vertical (y-axis) are the tools, and the horizontal (x-axis) are the jobs. Where the y-axis and the x-axis intersect, will be the quantity of tools needed for that specific job. There are almost 1500 tools, and 100 jobs.

View 4 Replies View Related

Creating Array From 2-dimensional Array

Nov 28, 2011

I'm new to arrays. They seem promising for what I want to do though...

Heres where I'm at. I have some data like this:

items freq 1 0.5 2 0.5 3 0.5 4 0.25 5 0.25 6 0.125

Now, I've created a 2 dimensional array, as such:

Code:
Sub testarray()
Dim arr1 As Variant
Dim rng1 As Range
Dim lngX As Long

Set rng1 = [A2:A6]
ReDim arr1(1 To rng1.Count, 1 To 2)
For lngX = 1 To rng1.Count
arr1(lngX, 1) = rng1.Cells(lngX, 1)
arr1(lngX, 2) = rng1.Cells(lngX, 2)
Next
End Sub

Now, what I need to do, is create an array for each freq of all the items that share that freq. Essentially I need this:

0.5 {1,2,3} 0.25 {4,5} 0.125 {6}

Now, I was thinking, if I could create a dictionary object and make the key the freq (so my keys would be 0.5,0.25,0.125) then I could assing the "item" an array (or another dictionary) holding the items that apply to that freq.

View 9 Replies View Related

Finding A Value In 2 Dimensional Array?

Jan 15, 2014

i have a sheet in template i use in preparing bid packages for electrical installations.it relates to locating in a (building) grid the locations of the motor control (mcp) and power panels (cdp).my desire at this point is to find a way to local a unique value (mcp or cdp) in a 2d grid and then return the column and row names from the same grid. eventually this information will populate a table of all the mcp's and cdp's with their locations.

my sticking point appears to be finding a unique value in a 2d table. this value can be anywhere in the table, not just the first column.

i've tried the lookups and index/match. match fails when i extend the lookup_array beyond the first column.
not sure if this is even possible.

View 8 Replies View Related

Interpolate Two-dimensional Array

Feb 14, 2007

With a known X and Y, trying to solve for Z from a table. ie: IF a variable X is defined across a row, another variable Y defined down a column, the data field Z fills in-between. What do I need to use to interpolate for both X and Y to solve for Z?

View 9 Replies View Related

Function For 2-dimensional Array

Feb 27, 2007

I am trying to write a public function that fills a table for a 2-dimensional array and am having trouble with my named ranges. The x-axis is based on years (range F2:O2) and the y-axis is a q_factor (range E3:E23) so the data range would be (F3:O23. The following outlines my logic:

Public Function bondValue(years As Range, q_factor As Range, z As Double)

Dim nRow As Long, nCol As Long
Dim bondPort As Range

nRow = q_factor.Rows.Count
nCol = years.Columns.Count
sumTau = 0

View 6 Replies View Related

Return Array Elements From 2D Array

Feb 11, 2008

I'm trying to use an array to carry out string function on a range of excel cells.

Here is the code I am using

Dim arrXl As Variant

arrXl = ws.Range("F1:F" & ws.Range("D1").End(xlDown).Row)

For i = LBound(arrXl) To UBound(arrXl)
MsgBox (LBound(arrXl))
'If 1st char is different from 3rd char then remove all of string after 1st char

If Left(arrXl(i), 1) <> Mid(arrXl(i), 3, 1) Then
arrXl(i) = Left(arrXl(i), 1)
End If
'If 1st char is different from 7th char then delete string after 5th char
If Left(arrXl(i), 1) <> Mid(arrXl(i), 7, 1) Then
arrXl(i) = Left(arrXl(i), 5)
End If

The lbound function returns the value of 1 as the lower bound, I do not have "Option base 1" set so I was expecting the lbound value to be 0. The first 2 cells in the F column are blank so this may have something to do with it, I am unsure if cells in excel can be null if they can be null one cell may be null and the other may be a zero length string but I am unsure about this.

The ubound function returns a value of 487.

The code breaks when I try to access an element in the array so it breaks on the line:

If Left(arrXl(i), 1) <> Mid(arrXl(i), 3, 1) Then

and returns the "Subscript out of range" error message.

View 5 Replies View Related

Populating A Multi-dimensional Array

Nov 26, 2008

I have a spreadsheet which I will be adding to over time. I need a macro that will look for the last 10 rows and then pull together a summary table based on data from several of the columns on each of those rows.

I've tried to go about this by using an array. The array will always be the same size (it will always be 10 by 11, i.e. EngineArray(10,11)-basically the same size as my summary table). I've also set Option Base 1.

What I’ve got so far is below. It isn’t working properly though. To start with I was getting ‘type mismatch errors’. Now instead of reading the numbers from the selected cells into the array, it just changes all the cells I’m trying to read from to ‘TRUE’?

View 6 Replies View Related

Transpose Dimensional Array Onto Sheet

Apr 21, 2014

I have a dimensional array / matrix that is current a 9 by X, where x depends on the amount of entries a user makes.

Anyways my question is that I have a sheet called "Database" and I wanted to know if there was a simple code to transpose my array on that sheet starting at cell "A2".

View 3 Replies View Related

Summing In A Multi Dimensional Array

May 15, 2007

I've created an array that is 60 pairs of cells wide. Each row in the array represents a different account. The 60 pairs of cells contain up to 60 payments in a payment stream. The first cell of each pair may contain an amount of interest to be paid, or zero if the time band in which it was/will be paid is not within the time range that I'm evaluating. The second cell of each pair may contain a number between 1 and 10 representing the time band in which the interest will be paid, or zero if the payment date falls outside of the time bands.

I need to be able to sum the interest to be paid in each time band for all of the accounts in my database.

Is there an Excel function that I could use or will I need to write some VBA code to loop through each row?

View 9 Replies View Related

Fill ComboBox With 2 Dimensional Array

Oct 9, 2004

I can set up a 2 dimensional array by using

array = Workbooks("Workbook.xls").Worksheets("Data"). Range("D_all")

as range D-all contains 2 columns and 20 rows

I can send that list to a combo box by using

Me.ComboBox1.List() = array

If I have ColumnCount set to 2 then both columns will be listed

If I have ColumnCount set to 1 then the 1st part of the array will be listed

But how do I list just the 2nd part of the array

View 8 Replies View Related

Multi-dimensional Array Solution

Jan 12, 2007

I am currently using a macro which highlights keywords and associated page views from an array in my website stats spreadsheet. Now I need to take it to the next level:

I want to use a multi-dimensional array to pull out any keywords that are duplicated, and display them at the top of my spreadsheet with the totaled page views next to them in a different color (red).

Here is my existing Keyword highlighting
Sub Highlight_Keywords()

Dim vntWords As Variant
Dim lngIndex As Long
Dim rngFind As Range
Dim strFirstAddress As String
Dim lngPos As Long

View 9 Replies View Related

Empty The All Elements In An Array

Dec 11, 2008

If I have say several hundred elements stored in an indexed array and I want to clear them each time the sub or function holding them is called, is there a way to erase the contents of the entire array without having to loop through each element.
Something like array().clear? Note that each time the sub is called, they are also redimed to some reference.

View 6 Replies View Related

Length Of Array With 100 Elements Possible?

Dec 23, 2008

I have a STRING array which is dimensioned with 100 elements possible. What i want to know is how to determine the "length" (not sure if this is the right word) of the array. For example: Suppose i have 10 strings in the array. Is there a command to determine that there are only 10 elements in the 100 possilble array?

View 11 Replies View Related

Add/Retrieve Elements From An Array

Apr 26, 2009

I can't seem to get my head around the simple issue of assigning a range of cell data to an array! Here is a snippet of what I have, maybe you can see the flaw:

View 8 Replies View Related

Count Elements In Array

Sep 8, 2009

I was wondering if there is a way to have the elements of an array counted. I have something like this:

View 6 Replies View Related

VBA - How To List All Elements In Array

Jan 21, 2012

I have a question regarding arrays. If I have too many elements in a 1D array(let's say 1000), how can I list all of them in a msg box (separated by comma)?

View 2 Replies View Related

Retrieving Elements Of Array

May 14, 2013

I am facing the some issue while tried to display the data from array. Below is code I have to tried to display the data from array.

Scenario: I have assigned the few values in my excel to an array and tried to display the data stored in array

Sub Main()
Dim Rows_Array() As Variant
Dim i As Integer,
Sheets("EmployeeWise").Select
Rows_Array = Range("C6:C" & Range("C65536").End(xlUp).Row).Value
For i = 1 To UBound(Rows_Array())
MsgBox Rows_Array(i)
Next
End Sub

View 1 Replies View Related

Rank Elements Of 2D Array

Sep 1, 2007

I am trying to present a 10X10 Matrix Range (A1:J10) full with UNIQUE INTEGER random numbers. I thought to use an Single Dimension Array (100 deep) and fill it with the Rnd() Function.

Then, I thought to check the RANK of each element of that Array and transfer it to 100 cells (10X10) in the Sheet (assume A21:J30) with the help of 2 nested loops.

My problem is: How to find the Rank of each element within ARRAY1. Is there a way to refer to an Array as to a Range in a Worksheet. (I do not want to transfer 100 values from the Array to the Sheet - I rather prefer to check the Rank WITHIN(!) the Array).

Option Base 1

Sub MiKe()
Set AWF = Application.WorksheetFunction
H = 10
V = 10
Redim Array1(H * V)
For CL = 1 To H * V
Array1(CL) = Rnd()
Next
For HC = 1 To H
For VC = 1 To V.........................

View 2 Replies View Related

Converting Range Data To 1 Dimensional Array?

Sep 10, 2012

I had this code and it works like a charm, except, it crashed if the data gathered is just one element due to transpose ..

VB:
Function getAR(c1 As Range, c2 As Range, w As String) As Variant
Dim s As String
Dim arrTemp() As Variant
Dim arr() As Variant

[Code]......

View 5 Replies View Related

Inserting Dictionary Object Into One Dimensional Array?

Mar 30, 2012

What I'm trying to do:

1) I have data that has a header row of 6-10 values (created, action, type, id, ...). The rows are unique records.
Click here to see the data

2) I originally wanted to read the data into one array (DataArray) and the header into another array (KeyArray). Then I would add additional unique information about each record (additional columns of info) into the DataArray.

3) I stumbled upon Dictionaries as a way of storing key/item pairs, which I thought could apply to each record since the headers are all unique and would be a way of storing key/items without needing to:

a) Know the ordering (if I used arrays I had to know the upper bound of the array to insert a column
b) Look up which what position in the array mapped to which column header
c) Resize the array every time I wanted to insert a new column of information on all the records

4) So now that I know about a dictionary object, I believe I need to create one Dictionary object for EACH record (row) of my data and then store those Dictionary objects within a one dimensional array such that each element of the array is a Dictionary.

5) This way I can iterate through each element of the array to access the dictionary inside and perform calculations on each record, depending on which key/item I needed to work with at a later point

Questions for Dictionary experts:
1) Is my approach sound?
2) What is the syntax for putting the dictionary of one row's worth of data into an element of a one-dimensional array?

View 8 Replies View Related

Retrieve Content / Values Of One Dimensional Array

Sep 15, 2012

I'm trying to make this piece of code work to no avail yet... Every time I run it, the compiler pops up with Error #9: "Subscript out of range". The range consists of hundreds of cells in 1 column with geographic coordinates formatted as "General". Like this: myArr(38.91472, 37.20318, 38.63824, etc.). Tried to re-format the cells to "Number" - doesn't work either.

Code:

Sub searchArray()
Dim myArr() As Variant
Dim i As Integer
myArr = ThisWorkbook.Worksheets("Sheet1").Range("G1:G8594").Value
For i = LBound(myArr) To UBound(myArr)
Debug.Print myArr(i)
Next i
End Sub

View 2 Replies View Related

Declare 2 Dimensional Array With Integers And Strings

Jun 2, 2013

I need to declare a two dimensional array that will return the Row and the cell's string value. My only solution is to return the row as a string like this.

Public GlobalArray(2, 100) As String

How to get more control than this? Maybe I should just declare it as a variant but this might open it up for problems later.

View 3 Replies View Related

Declaring Public 2 Dimensional Array In Userform

Apr 22, 2014

i'm trying to develop an array that is populated when a userform is activated. The userform has a command button that when pressed, will cross check the information filled out in the userform with the entries in the array. If there are no matches then the array is ReDim and the new information is added to the array. Once all the entries have been made. The array is then transposed to a sheet titled "Database". My problem is that vba is not allowing me declare a public array.Below is the first part of the code. Which is when the userform is activated.

Private Sub UserForm_Activate()
With Sheets("Resources")
cbZIP.List = .Range("A2", .Range("A" & Rows.Count).End(xlUp)).Value
cbBED.List = .Range("B2", .Range("B" & Rows.Count).End(xlUp)).Value
cbBATH.List = .Range("C2", .Range("C" & Rows.Count).End(xlUp)).Value
cbSTABRV.List = .Range("G2", .Range("G" & Rows.Count).End(xlUp)).Value
End With

[code]....

View 1 Replies View Related

Assign Listbox Values To Two Dimensional Array

Feb 11, 2007

How can I assign values from a listbox to a twodimensional array?

and next

do something like search and remove a row and assign the array back to the listbox

I know I can do it directly, but I need the array for something else too

View 5 Replies View Related

Data Type Of Coordinates Of 2-dimensional Array

Apr 29, 2007

I have a big array "DataArray" and want to access it:

For i = 1 To 4
variable = DataArray(SourceArray(i))
Next i

"DataArray" has two dimensions, so SourceArray has to consist of data like this:

SourceArray(1) = 1,2
sourceArray(2) = 2,4
etc

What data type does Sourcearray have to be? Integer doesnt seem to work, and DataArray doesnt like a string as coordinates. I have a workaround with two different arrays of integer for x and y coordinates, but this cannot be it.

View 4 Replies View Related

Fill Range From Multi-dimensional Array

Jul 20, 2007

I searched and found a few posts about transposing arrays into a range of cells, but none of them seemed to solve my problem. So, my problem is, I have a .Net assembly which provides various functions to allow Excel to access our Oracle DB stored procedures/tables, etc. This assembly is exposed via COM Interop. I call the GetSPINTypes() method, which returns me a list of type pairs (ID, Name), in a CSV string format.

I split the CSV into rows, and then put each row into a 2-dimensional array.
I then need to dump that array into one of my sheets in Excel, so I try to do the usual Range.Value = Array, but this sometimes tells me there is a type mismatch, and most times just doesn't fill the range. I've checked my arrays in the watch window, and they have definitely been filled in correctly, the values just don't appear when they are put into the sheet. See the code I'm using below:......

View 4 Replies View Related

Multi-dimensional Array Not Showing In Listbox

Aug 18, 2007

I have made the function below to return a variant multidimensional array. I pass the function an array of folder paths that I wish to search through looking at subfolders within that path where their name matches a search string that I pass to the function. eg., it will find a folder named "Catnap" if you pass the string searching for as "Cat*".

The size of the array it builds depends on how many folders it finds that match the search string and so needs to be built dynamically. Hence, I believe it builds a 2 dimensional array horizontally and I transpose it at the end of the function. In each element I put the folder name that was found in the first dimension and the path to that folder in its second dimension.

I have a 2 column listbox on a form that I set this array to. eg., Me.ListBox1.List = DirPaths("C:","Cat*",vbDirectory,100)

This works fine and shows a list of folder items found by folder and path in the two columns of the listbox if there is greater than 1 search found. However, when the search only finds 1 then the listbox shows the folder name with the folder path in row 2 of the list box. (See below).....

View 2 Replies View Related

Fill & Rearrange Multi-dimensional Array From Another

Feb 26, 2008

I've got the folowing array's

date1>company1>price
>Company2>price
>company3>price
>enz

Date2>company1>price
>company2>price
>enz

enz.

But these are not the array's that i need for a correlation that i want to make.
Is it possible to transform the array's above to an array such as:

Company>date1>price
>date2>price
>date3>price
>enz

View 5 Replies View Related

Evaluate Multi-Dimensional Array Matrix

Feb 27, 2008

I'm trying to use VBA to do some matrix processing. I have successfully done matrix processing in the spreadsheet, but I'm looking to port the logic into VBA to more easily reuse central formulas and reduce the amount of code in the spreadsheet.

The function shown below works. I had to hack around the variable declarations to eliminate processing/compile errors but it seems to function (no pun intended).

While debugging I noticed that this function would seem to get called 4 times. I do have other modules running, although I don't think any other modules are affecting this.

After some input from shg, I updated the variable declarations, but I'm getting an "Overflow" error reported. Sometimes (not always) a divide by zero also pops up. I do have the Msgbox for errors at the end, I haven't tried removing that part to see if the error reporting vanishes. I'm not sure 'hiding' error alerts is the best thing to do anyway...

View 8 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved