Solved

add item to array in vba

Posted on 2014-10-02
1
245 Views
Last Modified: 2014-10-02
I am looping through a recordset and where an instr is found I want to add that item to aliasarray but it wont allow, i am not sure how do deal with this as the size of the array is as of yet unknown  

I thought referencing it directly it would add the string.
Do Until RstAlias.EOF
           
            If InStr(Me.[DecodeResult].Value, .Fields("sClientDescGroup").Value) <> 0 Then
           
                AliasArray(index) = .Fields("sDesc").Value
                index = index + 1
            Else
           
           
            End If
       
       
       
        .MoveNext
        Loop
0
Comment
Question by:PeterBaileyUk
1 Comment
 
LVL 10

Accepted Solution

by:
Anthony Berenguel earned 500 total points
ID: 40357636
Try using Redim Preserve AliasArray(Index +1) as [datatype] before trying to assign a value to a position in the array.

so it would look like this
Redim Preserve AliasArray(Index +1)  as [datatype]
AliasArray(index) = .Fields("sDesc").Value
index = index + 1

Open in new window

0

Featured Post

Live: Real-Time Solutions, Start Here

Receive instant 1:1 support from technology experts, using our real-time conversation and whiteboard interface. Your first 5 minutes are always free.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Regardless of which version on MS Access you are using, one of the harder data-entry forms to create is one where most data from previous entries needs to be appended to new records, especially when there are numerous fields and records involved.  W…
I originally created this report in Crystal Reports 2008 where there is an option to underlay sections. I initially came across the problem in Access Reports where I was unable to run my border lines down through the entire page as I was using the P…
With Microsoft Access, learn how to specify relationships between tables and set various options on the relationship. Add the tables: Create the relationship: Decide if you’re going to set referential integrity: Decide if you want cascade upda…
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …

786 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question