automatisch vullen

Status
Niet open voor verdere reacties.

moensk

Gebruiker
Lid geworden
23 jun 2013
Berichten
711
binnen mijn invulformulier heb ik volgend script om velden automatisch te laten vullen.

Code:
Private Sub Keuze_Deb_whs_BeforeUpdate(Cancel As Integer)
Me.Deb_whs_naam = keuze_Deb_whs.Column(1)
Me.DEBITEURCODE = keuze_Deb_whs.Column(2)
Me.LAADNAAM = keuze_Deb_whs.Column(3)
Me.LAADPOSTCODE = keuze_Deb_whs.Column(5)
Me.LAADPLAATS = keuze_Deb_whs.Column(6)
Me.LAADLAND = keuze_Deb_whs.Column(7)
End Sub

ik krijg dit enkel werkend als ik in het veld "keuze_deb_whs" aangeef bij opmaak "zichtbaar = 7"
doch in dit veld wil ik maar 2 kolommen zichtbaar hebben (is een keuzelijst met invoervak) wegens ruimte gebrek
 
excuseer zichtbaar = 7 is niet correct moet zijn "aantal kolommen = 7" bij eigenschappen van het veld
 
Sterker nog: het aantal kolommen moet je instellen op 8 :). Waarom deze gebeurtenis? Is m.i. de meest onlogische die je kan bedenken. Ik gebruik altijd de gebeurtenis <Bij klikken>, want dat is exact het moment dat jij wilt dat de code wordt uitgevoerd.
Als je maar 2 kolommen wilt zien, moet je de breedte van de overige kolommen op 0cm instellen, dan zie je ze niet.
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan