Hej Forum,

Jeg har ikke mulighed for at vedhæfte det originale ark, derfor en kopi af som viser eksempel på mit mine to Problemer og en hjælp.

Min simple kode ser således ud:

Private Sub CommandButton1_Click()

Range("Ark1!C2") = Format(tbFstart, "MM-DD-YYYY")
Range("Ark1!E2") = Format(tbFslut, "MM-DD-YYYY")
Range("Ark1!C3") = Format(tbKurs, standard)
Range("Ark1!C4") = Format(tbAfgift, standard)
Range("Ark1!C5") = Format(tbPbank, standard)
Range("Ark1!C6") = Format(tbUbank, standard)

'Indsæt værdi fra celle B9 i tekstboks: GRANDDATO
'Indsæt værdi fra celle B11 i tekstboks: GRANDBANK

End Sub

Formularen hedder: UserForm1.

Problem 1: Decimaltal (tbPbank og tbUbank)

Tastes der et helt tal f.eks. 123, så fungere alt OK. Taster jeg derimod decimaler f.eks. 123,12 så virker det ikke. Cellen i selve regnarket anser tallet som tekst.

Jeg er ikke interesseret i at der kommer valutasymbol f.eks. ’Kr.’

Problem 2: Procent (tbKurs og tbAfgift)

Jeg her bekendt med at Format(XXX, Percent), men den ganger det indtastede med 100. Skrives 2  fremkommer værdien 200 i celle C3/C4.

Hjælpen: Trække data fra ARK til formular

I formularen har jeg 2 Textbokse – Jeg tror det er det jeg skal bruge.

I de to textbokse (GRANDDATO og GRANDBANK) ønskes at værdien fra celler celle B9 og B11.

På forhånd tak for hjælpen.

uploads/1637/Userform.xlsm