Keuzelijsten verdubbelen

[toverkamp]

Ik heb in VBA een formulier aangemaakt met daarin keuzelijsten. Het gaat om het volgende: er is een keuzelijst soort storing, en een keuzelijst beschikbaar. Elke keer wanneer ik een formulier compleet heb ingevuld en nog een storing wil toevoegen zijn deze lijsten verdubbeld.

Dus dan staat er bij beschikbaar:
ja
nee
ja
nee

in plaats van:
ja
nee

Heeft iemand enig idee hoe dat komt. Zie ook de bijlage

 

[maartenf]

je moet het formulier nog unloaden
dus

Unload Storingsformulier


voor de rest: ik zie dat je al grote vorderingen hebt gemaakt
mijn complimenten

 

[toverkamp]

je moet het formulier nog unloaden
dus

Unload Storingsformulier


voor de rest: ik zie dat je al grote vorderingen hebt gemaakt
mijn complimenten

Ik dacht dat het probleem was opgelost, maar ik zie nu net dat hetzelfde probleem zich weer herhaald. Waar moet ik de code neerzetten. Ik heb hem nu als volgt geplaatst in:
Formulier:
Private Sub opslaan_Click()

'gegevens.....

MsgBox "Gegevens zijn opgeslagen"
Unload Storingsformulier
Storingsformulier.Hide

End If

End Sub

 

[Demeter]

Zet je code buiten je if functie.

MsgBox "Gegevens zijn opgeslagen"
Storingsformulier.Hide
End If

[COLOR="Red"]Unload Storingsformulier[/COLOR]

End Sub

heb even met je form gespeelt, maar als ik de gegevens opsla krijg ik ze in rij A2 geplakt, klopt dit?

 

[toverkamp]

Zet je code buiten je if functie.

MsgBox "Gegevens zijn opgeslagen"
Storingsformulier.Hide
End If

[COLOR="Red"]Unload Storingsformulier[/COLOR]

End Sub

heb even met je form gespeelt, maar als ik de gegevens opsla krijg ik ze in rij A2 geplakt, klopt dit?

Ok bedankt.
euhm dat kan kloppen, ik heb de opmaak zelf alweer wat veranderd namelijk. De gegevens moeten in ieder geval onder de juiste kopjes komen te staan.

 

[Demeter]

Je zou ook kunnen werken met:

      MsgBox "Gegevens weggeschreven naar blad 2"
    End If
Unload Me
End Sub

Groet,
Ferenc

ps. voor een complete post, hier het werkende filetje.