Waarde uit userform vinden in 4e kolom en dan tabel vullen

[novec]

Hallo

Ik ben bezig een formulier voor de hengelsport vereniging te maken.

De excel sheet is wel klaar maar met het userform loop ik tegen een probleem op.
Als ik een naam van een deelnemer invul in het formulier en dan wil opslaan komt er een foutmelding.

Ik zoek de naam in de 4e kolom en wil dan alle gegevens invullen die rij in de tabel.

Ik heb nu nog alleen de 1e cel in de tabel in de code staan maar hier ontstaat de foutmelding al.

Ik heb d nodige dingen geprobeerd..... maar helaas.

Steven
Bekijk bijlage VissenTest.xlsm

 

[edmoor]

Je hebt het 2x over een foutmelding, maar die melding zelf vertel je er niet bij.

 

[novec]

fout 13
Types komen niet overeen.

 

[ExcelAmateur]

Het regeltje zo werkt wel.

lRange = Application.Match((cbxNaam.Value), .Columns(4), 0)

 

[Cobbe]

Pas deze regel eens aan:

lRange = Application.Match(cbxNaam.Text, .Columns(4), 0)

CbxNaam = text en geen integer

 

[edmoor]

Precies ExcelAmateur.
Met "lRange = Application.Match(CInt(cbxNaam.Text), .Columns(1), 0)" wordt getracht de waarde uit de textbox naar een Integer te converteren en dat gaat uiteraard niet. Vandaar de fout dat de typen niet overeen komen.

 

[novec]

Dank jullie wel.
Echt ik was in de overtuiging deze oplossing getest te hebben, maar blijkbaar niet.
En als je er te lang naar staart maak je foutjes zoals die integer functie. Stom van mij maar geweldig dat ik jullie hulp krijg.

Steven

 

[edmoor]

Dat fenomeen is mij niet onbekend