VBA, excel 2007, Userform gebruiken voor database

[jackfish]

Ik wil graag met een userform gebruiken als database-invoerscherm. Daarvoor heb ik op de site van snb een mooi voorbeeld gevonden http://www.snb-vba.eu/VBA_Userform_in_database.html.

Wanneer ik een nieuwe naam invoer en op vervolg (opslaan) klik, dan wordt die inderdaad weggeschreven in de datae. Wanneer ik het userform weer open en opnieuw een nieuwe naam invoer, dan wordt mijn eerdere invoer overschreven?

Wat doe ik niet goed?

 

[edmoor]

Je kan beter je document even plaatsen. Zo is er niks van te zeggen.

 

[jackfish]

Op de site kun je het voorbeeld downloaden, nu ook in de bijlage het bestand van snb.

Bekijk bijlage __userform_in_database.xls

 

[edmoor]

Ok, het is dus exact hetzelfde document zonder enige wijziging. Het probleem dat je stelt gebeurd bij mij ook omdat er geen lege regel meer in de combobox zit die je kunt kiezen, voordat je het document volledig sluit en opnieuw opent. Wellicht dat snb daar even naar kan kijken.

 

[HSV]

Zet eens onder 'Hide' → 'unload me' in de "vervolg_click".

 

[jackfish]

Dank voor de snelle reacties edmoor en HSV. Met 'unload me' wordt overschrijven inderdaad voorkomen.

Ik heb nu onderstaande code gebruikt zodat, zonder het scherm te sluiten, meerdere records achter elkaar ingevoerd kunnen worden.

Application.ScreenUpdating = False
    Unload Me
    scherm.Show
Application.ScreenUpdating = True

Het voelt alleen een beetje als afbreuk doen aan de strakke code. Kan het technisch beter, anders? Misschien een knop nieuwe invoer ...

 

[HSV]

Hallo Jackfish.

Je ontkomt er niet aan.
Doordat de initialize() het blad sorteert en de list van de combobox opnieuw samenstelt.
Screenupdating heeft volgens mij geen effect op het form.

End With
    Unload Me
    scherm.Show
End Sub