out of memory

V

vinod

Hi,
when I am trying to save 4500 contacts in outlook using macro ... I am
getting "out of memory error"
Do any one know work round?


For ii = 0 To no_of_contact - 1
myitem.FirstName = item_array(1)
myitem.LastName = item_array(2)
myitem.CompanyName = item_array(3)
myitem.Department = item_array(4)
myitem.Categories = item_array(5)
myitem.Email1Address = item_array(6)
myitem.MobileTelephoneNumber = item_array(7)
myitem.BusinessTelephoneNumber = item_array(8)
myitem.BusinessFaxNumber = item_array(9)
myitem.BusinessAddressStreet = item_array(10)
myitem.BusinessAddressCity = item_array(11)
myitem.BusinessAddressPostalCode = item_array(12)
myitem.BusinessAddressState = item_array(13)
myitem.BusinessAddressCountry = item_array(14)
myitem.HomeTelephoneNumber = item_array(15)
myitem.JobTitle = item_array(16)
myitem.ReferredBy = item_array(17)
myitem.body = item_array(18)
myitem.Spouse = "-"
myitem.Save
Erase item_array
Set myitem = Nothing

next
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Working with Outlook Contacts from Access 13
What causes memory error with BCM (Outlook 2007) 4
Out of Memory Error in Excel 2008 32
out of memory error 2
VBA Excel - Compile Error: Out of Memory 1
Routine running slow (memory leak?) 3
MSACCESS.EXE Hangs in Memory - NEED HELP! 2
Replace a simple TXT 5

Top