Hallo,
Ik ben een newbe op het gebied van VBA en heb een probleem met custom fields in een eigen gemaakt outlook form.
Er zijn 3 velden met ja/nee; deze heten "ib", "vpb" en "opdr". Verder heb ik een veld "jaar". Als dit veld jaar verandert van waarde, bv van 2000 naar 2001 dan moeten de velden met ja/nee terug worden gezet naar "nee". Voorts moet ook worden gekeken of er permissie is door bepalen van de gebruikers naam: adminstrator. Hiervoor heb ik een stuk code dat werkt:
Function GetNTUser()
Dim wshNet
Dim sUser
set wshNet = CreateObject("WScript.Network")
sUser = wshNet.UserName
set wshNet = nothing
GetNTUser = sUser
End Function
Kan iemand mij helpen met het stuk code dat nodig is voor het terugzetten van de 3 ja/nee velden. Ik heb speciaal een probleem met het toekennen van een waarde aan de Custom Fields.
Alvast bedankt!
Ik ben een newbe op het gebied van VBA en heb een probleem met custom fields in een eigen gemaakt outlook form.
Er zijn 3 velden met ja/nee; deze heten "ib", "vpb" en "opdr". Verder heb ik een veld "jaar". Als dit veld jaar verandert van waarde, bv van 2000 naar 2001 dan moeten de velden met ja/nee terug worden gezet naar "nee". Voorts moet ook worden gekeken of er permissie is door bepalen van de gebruikers naam: adminstrator. Hiervoor heb ik een stuk code dat werkt:
Function GetNTUser()
Dim wshNet
Dim sUser
set wshNet = CreateObject("WScript.Network")
sUser = wshNet.UserName
set wshNet = nothing
GetNTUser = sUser
End Function
Kan iemand mij helpen met het stuk code dat nodig is voor het terugzetten van de 3 ja/nee velden. Ik heb speciaal een probleem met het toekennen van een waarde aan de Custom Fields.
Alvast bedankt!
