verticaal zoeken

[sietzep]

hallo allemaal

enkele jaren geleden heb ik een facturatieprogramma gemaakt in excel
met behulp van verticaal zoeken in een dropdown menu kan ik mijn klanten selecteren en deze gegevens op de factuur plaatsen.

Het probleem is nu dat dit niet verder gaat dan klantnummer 84.
Als ik een nieuwe klant toevoeg bij nummer 120 geeft excel de gegevens weer van klantnummer 84.

ik heb de formule enkele keren opnieuw gemaakt en ook het bereik aangepast. helaas werkt dit niet

wie heeft voor mij een oplossing?

 

[VenA]

Je zoekt in Kolom A op klantnummer. Deze is ingevuld tot nr 84. Daarnaast mis je de laatste parameter in de VERT.ZOEKEN functie waardoor je verkeerde resultaten krijgt.

 

[Haije]

vul de gegevens in kolom A van tabblad klanten eens aan.....

 

[sietzep]

hartelijk dank dit was inderdaad het probleem, dom dat ik daar zelf niet naar heb gekeken.
maar bedankt voor het meekijken.

 

[VenA]

Waarom heb je het bestand weggehaald? Nu zijn de antwoorden niet echt te volgen. Als je macro's gebruikt dan kan je deze het beste even opschonen.

Sub factuurparticulierleeghalen()
  Range("A27:A37,C20:O25,D27:D37,H27:H37,J27:J37").ClearContents
  Sheets("factuur bedrijf").Range("f445") = Sheets("factuur bedrijf").Range("f445") + 1
End Sub

ipv

Sub factuurparticulierleeghalen()
'
' factuurparticulierleeghalen Macro
'

'
    ActiveWindow.SmallScroll Down:=6
    Range("C20:O25").Select
    Selection.ClearContents
    ActiveWindow.SmallScroll Down:=6
    Range("A27:A37").Select
    Selection.ClearContents
    Range("D27:D37").Select
    Selection.ClearContents
    Range("Q27:Q37").Select
    Selection.ClearContents
    Range("H27:H37").Select
    Selection.ClearContents
    Range("J27:J37").Select
    Selection.ClearContents
    ActiveWindow.SmallScroll Down:=-18
    Range("f1").Select
    Sheets("factuur bedrijf").Range("f445") = Sheets("factuur bedrijf").Range("f445") + 1
End Sub