groot adressenbestand splitsen per gemeente?

[rickmans]

ik heb een ontzettend dik adressenbestand
indeling van access2000
die wil ik splitsen per gemeente en als t helemaal mooi is gelijk per gemeente naar excelbestanden geexporteerd hebben.

dit moet toch mogelijk zijn, alleen ik kom er niet uit.

wie helpt me?!!

thanks! rick..

 

[gregorg]

En moeten dat excelsheets per gemeente zijn of alles in 1 sheet of iedere gemeente een sheet?

Gregor

 

[rickmans]

En moeten dat excelsheets per gemeente zijn of alles in 1 sheet of iedere gemeente een sheet?

Gregor

het zou per gemeente een apart excelbestandje moeten worden.
alvast thanks for je idee als je wat weet..:thumb:

 

[Frontier]

maak iets met een loop en verwerk zoiets.

Sub openenExcel()
Dim ExcelSheet
Set ExcelSheet = CreateObject("Excel.Sheet")
cGemeente = me.jouwgemeente
ExcelSheet.Application.Visible = True
ExcelSheet.ActiveSheet.Cells(1, 1).Value = "jouw gemeentelijst o.i.d."
ExcelSheet.SaveAs "C:\" & cGemeente & ".XLS"
ExcelSheet.Application.Quit
Set ExcelSheet = Nothing

End Sub

 

[Dnereb]

Nee niet splitsen naar gemeente....
De tabel splitsen! in een tabel gemeenten, een tabel straatnamen en de combinerende tabel adressen.
Zo reduceer je de omvang enorm.
in je adressenbestand staat dan alleen een cijfer om de gemeente aan te geven en 1 voor de straatnaam (huisnummer in een apart veld mag ik hopen)
En hoeveel Kerkweggen en noordkade's en dorpstraten staan er wel in je bestand?
net zoals alle koningshuis straaten die in vrijwel elk gat te vinden zijn.

 

[Frontier]

klopt, kan je zo via bij limewire vinden hoor (2006postcodetabel.mdb)
vergis je niet 76 mb groot.

 

[Frontier]

gezipte versie, zoek op:
PostcodeNL v6.1

 

[rickmans]

acces voor dummies

mijn excuus voor mijn late reactie maar ik kom niet veel aan dit toe drukdruk

ik ben handig met pc's maar niet echt ervaren met access en excel dus die code hieronder die je gaf zegt me niet echt veel wat ik daar mee moet, maar ik wil het wel graag leren!
dus ik weet niet of je me er even "access-for-dummies"- doorheen wil praten misschien?
je zou me een ontzettend hersenloos karwei besparen want met de hand alles gemeentes kopieren en plakken dat gaat vervelen.

ik zag nog iemand iets zeggen over of t huisnummer in n aparte kolom stond en ja dat is zo.
dit zijn de kolommen waar het blad uit bestaat.
naam/straat/nummer/tel(net)/nummer
http://www.helpmij.nl/forum/attachment.php?attachmentid=33563&stc=1&d=1150368486
maar ja, ik hoor dus graag een uitleg voor deze acces-dummie.

thanks! Rick.

maak iets met een loop en verwerk zoiets.

Sub openenExcel()
Dim ExcelSheet
Set ExcelSheet = CreateObject("Excel.Sheet")
cGemeente = me.jouwgemeente
ExcelSheet.Application.Visible = True
ExcelSheet.ActiveSheet.Cells(1, 1).Value = "jouw gemeentelijst o.i.d."
ExcelSheet.SaveAs "C:\" & cGemeente & ".XLS"
ExcelSheet.Application.Quit
Set ExcelSheet = Nothing

End Sub

 

[Frontier]

mmmmmmmm, ziet er goed uit... het nederlandse telefoonboek. Wil ik wel hebben hoor.

Ok, vertel nu nog eens precies a.d.h.v. de foto wat je wilt.

 

[rickmans]

toelichting

mmmmmmmm, ziet er goed uit... het nederlandse telefoonboek. Wil ik wel hebben hoor.

Ok, vertel nu nog eens precies a.d.h.v. de foto wat je wilt.

oke dan..
het nederlandse telefoonboek..
das volgens mij n rip van de telefoongids-cd die ik dus moet splitsen (in aparte excelletjes uiteindelijk) op n pc uit 1985 waarop alleen t openen van t accessbestand al n half uur duurt(!)
daarna de dubbele nummers er uit daar heb ik n formule voor van n vriend v me gekregen dat scheelt me al 3 jaar werk..

dus..

het probleem wat ik nu nog heb..
als het mogelijk is met n formule dubbele nummers op te zoeken moet t toch ook mogelijk zijn om een naar t schijnt eenvoudiger taak automatisch te doen zoals het splitsen van een bestand naar kleine bestandjes/ vellen per gemeente.

dat hoopte ik uit te vinden..

dus als je dat weet ben ik heel blij.

ik ben bezig t bestand a800mb ofzo te uploaden naar sendspace of rapidshare want er zit nie eens een beschikbare usb poort op dat kreng, maar als ik dat voor elkaar heb en je hebt nog steeds interesse dan zal ik je nie vergeten. :thumb:


nou ik hoor t wel weer he, thanks iig..

rick