Postcode

[udo1967]

Moet in Excel dagelijks mutaties bijhouden. Nu is er een apart excel bestand waar
alle straten + postcode + huisnummer range van mijn woonplaats in staan.

A = Naam straat (Kalverstraat)
B = Postcode (1000AA)
C = Vanaf (1)
D = t/m (101)

Nu zou het handig zijn dat ik dmv de postcode + huisnummer
de juiste straatnaam erbij krijg.

Kan iemand mij vertellen hoe die Formule eruit moet zien

BVD, Linda

 

[Withaar]

Als een hulp tabel gebruikt mag/kan worden is dit misschien wat voor je.

 

[Demeter]

Ben niet echt een formule goeroe maar kijk hier eens:
http://www.contextures.com/xlFunctions03.html

edit:
volgens mij moet je vb:
INDEX and MATCH -- Example 4
hebben.

 

[udo1967]

Postcode + huisnr

Als een hulp tabel gebruikt mag/kan worden is dit misschien wat voor je.

De Straat+Postcode+Range (en andere data) wordt bij iedere wijziging
vernieuwd. Dwz. geen Hulptabel of andere extra's hulplijnen.

Bij invoer v/d mutatie moeten twee data gegevens ingevoerd worden.

1) Postcode+huisnr. 1000AA12
2) Aard van de Mutatie

Deze 1000AA12 moet voldoende zijn op de juiste straat+range erbij te zoeken.

Is dat mogelijk ?

 

[Joske2000]

Hi Udo,

Hij zal de gegevens ergens moeten kunnen uithalen.
Hij kan ze niet "uitvinden" .

Plaats misschien een voorbeeldje (maakt veel duidelijk).

Joske

 

[udo1967]

Postcode Voorbeeldbestand

Hi Udo,

Hij zal de gegevens ergens moeten kunnen uithalen.
Hij kan ze niet "uitvinden" .

Plaats misschien een voorbeeldje (maakt veel duidelijk).

Joske

Bij deze een Voorbeeldbestand...

Knop : Invul Formulier Mutaties
is een primitieve wijze van invullen van de Mutaties.
Als je een mooiere wijze weet houd ik me aanbevolen.

De Volgorde van de Velden zou ik liever iets anders willen
hebben : Datum, Postcode+Huisnr., Soort, Opmerking

 

[CorVerm]

Wat betreft de volgorde van de velden: die kun je gewoon wijzigen. Het dataformulier herkent dat gewoon. Verder is het voldoende om deze code achter de knop te zetten:

Private Sub CommandButton1_Click()
ActiveSheet.ShowDataForm
End Sub

Je kunt met de tabtoets door de invoervelden "lopen".
Verder denk ik dat je een soort van uniek nummer moet toewijzen om de betreffende gegevens te kunnen vinden.

 

[udo1967]

Wat betreft de volgorde van de velden: die kun je gewoon wijzigen. Het dataformulier herkent dat gewoon. Verder is het voldoende om deze code achter de knop te zetten:

Private Sub CommandButton1_Click()
ActiveSheet.ShowDataForm
End Sub

Je kunt met de tabtoets door de invoervelden "lopen".
Verder denk ik dat je een soort van uniek nummer moet toewijzen om de betreffende gegevens te kunnen vinden.

Ben geen ster in VBA. Zal het erin zetten en kijken wat het precies doet.

De excel file met postcodes is een export bestand vanuit een nogal groot
database. Krijg het zo aangeleverd. Heb er niets over te zeggen hoe de
layout eruit moet zien. Vandaar het voorbeeld bestand.

 

[HierEnNu]

Zie bijgaand bestand. Is dit wat je bedoeld?
In het dataformulier hoef je alleen de datum, postcode+huisnr, soort en eventueel opmerking in te vullen. De overige gegevens worden middels formules aangevuld.
Waarschijnlijk dien je wel het pad in de formules aan te passen omdat ik een verwijzing heb gemaakt naar het postcodebestand op mijn pc.

Groeten,

M.

 

[sylvester-ponte]

hallo udo

is dit iets? om van postcode naar straat te komen

Function PostcodeNaarStraat(p As String) As String
    Dim postcode As String
    Dim rijwaarde As Long
    Set postcodeTabel = Windows("POSTCODE_BESTAND_2007.xls").Application.Sheets(1)
    Set postcodes = postcodeTabel.Columns("C:C")
    postcode = Left(Replace(p, " ", ""), 6) 'eventuele spatie moet weg
    Set rij = postcodes.Find(postcode)
    If rij Is Nothing Then
        PostcodeNaarStraat = "????"
        Exit Function
    End If
    rijwaarde = rij.Row
    PostcodeNaarStraat = postcodeTabel.Cells(rijwaarde, 2)
End Function

groet sylvester

 

[Axel Hagg]

Dag Udo,

Je gebruikt het dataform om je gegevens in te voeren. En dat dataform zoekt niet naar straten en kennelijk kan je daar ook geen opgdracht voor geven. Maak dus in VBA je eigen 'dataform' zodat je nadat postcode is ingevuld je programma zelf de bijbehorende straat opzoekt.

Gegroet,

Axel.

 

[udo1967]

Zie bijgaand bestand. Is dit wat je bedoeld?
In het dataformulier hoef je alleen de datum, postcode+huisnr, soort en eventueel opmerking in te vullen. De overige gegevens worden middels formules aangevuld.
Waarschijnlijk dien je wel het pad in de formules aan te passen omdat ik een verwijzing heb gemaakt naar het postcodebestand op mijn pc.

Groeten,

M.

De uitkomst is precies wat ik zoek. De oplossing is anders dan ik het me
had voorgesteld maar dat maakt niet uit. Het resultaat is het enigste wat telt.

Iedereen hartelijk bedankt voor het meedenken.

Linda