Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
using VB to read in a column of values of varying length into an array
Hi,
I am having trouble reading values from excel into an array. I have data that begins in cell E4 and will have varying length based on how much data the user lists. How can I read that data into an array. This is what I have tried so far: Dim k as integer ActiveCell.Range("E4").Select While activecell.value < "" yArray(k) = ActiveCell.Value ActiveCell.Offset(1, 0).Select k=k+1 Wend What am I doing wrong or what should I be doing? Any help is much appreciated. |
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
using VB to read in a column of values of varying length into an array
yArray = Range(Range("E4"),Cells(Rows.Count,"E").End(xlUp))
-- HTH Bob Phillips (replace xxxx in the email address with gmail if mailing direct) wrote in message oups.com... Hi, I am having trouble reading values from excel into an array. I have data that begins in cell E4 and will have varying length based on how much data the user lists. How can I read that data into an array. This is what I have tried so far: Dim k as integer ActiveCell.Range("E4").Select While activecell.value < "" yArray(k) = ActiveCell.Value ActiveCell.Offset(1, 0).Select k=k+1 Wend What am I doing wrong or what should I be doing? Any help is much appreciated. |
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
using VB to read in a column of values of varying length into an array
Dim aArray As Variant
aArray = Application.WorksheetFunction.Transpose _ (Range("E4:E" & Range("E65536").End(xlUp).Row)) To test: Dim aArray As Variant Dim i As Long aArray = Application.WorksheetFunction.Transpose _ (Range("E4:E" & Range("E65536").End(xlUp).Row)) For i = LBound(aArray) To UBound(aArray) MsgBox i & " " & aArray(i) Next 'i Regards Trevor wrote in message oups.com... Hi, I am having trouble reading values from excel into an array. I have data that begins in cell E4 and will have varying length based on how much data the user lists. How can I read that data into an array. This is what I have tried so far: Dim k as integer ActiveCell.Range("E4").Select While activecell.value < "" yArray(k) = ActiveCell.Value ActiveCell.Offset(1, 0).Select k=k+1 Wend What am I doing wrong or what should I be doing? Any help is much appreciated. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Column picked randomly with probability relative to number of entr | Excel Worksheet Functions | |||
How do I compare string values in one column to another column? | Excel Worksheet Functions | |||
Summing one column if two other columns' values appear in other sh | Excel Worksheet Functions | |||
Count Intervals of Filtered TEXT values in Column and Return Count across a Row | Excel Worksheet Functions | |||
How sum values in column B using values in column A as the conditi | Excel Worksheet Functions |