Rekenen in Userform

[drukkertje]

Private Sub txtBonus1_AfterUpdate()
txtBonus2 = 100 - txtBonus1.Value
End Sub

Hallo,

In een Userform wil ik een standaard berekende waarde in laten vullen voor txtbonus2.

Het betreft een percentage berekening;

txtbonus1 = x% (wordt door gebruiker ingevuld)
txtbonus2 = 100% - txtbonus1.Value

Ik heb bovenstaande formule geprobeerd maar daar ontbreekt iets aan.

Wie heeft voor mij de oplossing?

gr. Martin

 

[p van rooijen]

Je hebt de twee variabelen niet gedeclareerd.
Je zal ze moeten declareren als integer en niet als txt.

Hier is een goede referentie voor userforms.
Dan zal je hem moeten vertellen dat de variabele txtBonus1 zo wordt opgehaald.

 

[drukkertje]

Je hebt de twee variabelen niet gedeclareerd.
Je zal ze moeten declareren als integer en niet als txt.

Hier is een goede referentie voor userforms.
Dan zal je hem moeten vertellen dat de variabele txtBonus1 zo wordt opgehaald.

Dank je wel,

Zeer interessante site voor een VBA-beginner die ik ben.
Ik ga het eens rustig opzoeken en nalezen .

gr. Martin

 

[atmaram]

Je kan met een 'simpele' excel application.inputbox ook data ophalen.

Kijk maar eens hier

Let op dat dit iets anders is dan de vba inputbox die alleen tekststrings accepteert.

 

[drukkertje]

Je kan met een 'simpele' excel application.inputbox ook data ophalen.

Kijk maar eens hier

Let op dat dit iets anders is dan de vba inputbox die alleen tekststrings accepteert.

De oplossing is gevonden, met behulp van beide site.

Heren, mijn dank voor het aandragen van deze info.

gr. Martin