' counts the number of items in the data sheet
Dim i As Integer
Dim row As Integer
Dim count As Integer
Dim loc() As String
Dim row2 As Integer
Dim row3 As Integer
row = 2
For i = 0 To count
Do While Sheets("Data").Cells(row, 4) <> ""
row = row + 1
Loop
count = row - 1
Next
ReDim Preserve loc(count) 'preserves the upperbound of the array
Now I have the array with the upperbound. Now I need to loop through the
array again and pull out only unique values and I am not sure how to loop
through the array and form another array of only unique values. I have
tried several things and nothing has worked.
I want to say that if a string exists in Loc array more than once then only
input the value in store array once. How do I do this? I am so confused.
Thanks in advance for your help.
*Denice Bollinger
Revenue Controller
NewWave Link
Phone (662)298-1268
Fax (662) 429-8254
Cell (901)497-9595
[email protected]*
*
*
On Wed, Jun 20, 2012 at 6:09 AM, Stephen Russell <[email protected]>wrote:
>
>
> On Tue, Jun 19, 2012 at 6:32 AM, Denice Bollinger <
> [email protected]> wrote:
>
>> Can you give me an example .. Like I said I am new to this and still
>> learning.
>>
>> ------------------------------
>>>
>>
> How do you get data from the database now?
>
> Just make another call to the db and put it into another container for
> your list.
>
>
>
> --
> Stephen Russell
> Sr. Analyst
> Ring Container Technology
> Oakland TN
>
> 901.246-0159 cell
>
> --
> You received this message because you are subscribed to the Google
> Groups "DotNetDevelopment, VB.NET, C# .NET, ADO.NET, ASP.NET, XML, XML
> Web Services,.NET Remoting" group.
> To post to this group, send email to [email protected]
> To unsubscribe from this group, send email to
> [email protected]
> For more options, visit this group at
> http://groups.google.com/group/dotnetdevelopment?hl=en?hl=en
> or visit the group website at http://megasolutions.net
>
--
You received this message because you are subscribed to the Google
Groups "DotNetDevelopment, VB.NET, C# .NET, ADO.NET, ASP.NET, XML, XML
Web Services,.NET Remoting" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/dotnetdevelopment?hl=en?hl=en
or visit the group website at http://megasolutions.net
