View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Rob van Gelder[_4_] Rob van Gelder[_4_] is offline
external usenet poster
 
Posts: 1,236
Default Two Quick Questions

Sounds like an international decimal place issue.
I think some countries have a comma instead of a decimal place.
When you drop the value into the workbook, try converting to a number
datatype first.

eg. CDbl(txtCASH_REQUIRED.Text)



--
Rob van Gelder - http://www.vangelder.co.nz/excel


"Chuckles123" wrote in message
...

I have so far been working on Tom's solutions.
This is what I have for Private coding in my Form:

Private Sub cmdCASH_REQUIRED_Click()
Dim Str1 As String
Str1 = txtCASH_REQUIRED.Value
Cash = Val(Str1)
Unload Me
End Sub
__________________________________________________ _______________
Private Sub grpCASH_REQUIRED_Click()
End Sub
__________________________________________________ _______________
Private Sub UserForm_Click()
End Sub
__________________________________________________ _______________
Private Sub txtCASH_REQUIRED_Exit(ByVal Cancel As
MSForms.ReturnBoolean)
txtCASH_REQUIRED.Text = Format(txtCASH_REQUIRED.Text, "#,##0")
End Sub

(I deleted the If stmt because all data input will be digital.)

Very strange ... the above coding is taking user input, converting it
to a number, and dividing it by 1,000 (when it's dropped into the WB);
however, when the Form is displayed: e.g., the user keys '10000';
after keying 'Enter', a comma is inserted between the first two zeros,
appropriately.

Tom, I think there is a typo in your second solution; I tried to fix
it, but was unsuccessful.

Thanks again,
Chuckles123


--
Chuckles123
------------------------------------------------------------------------
Chuckles123's Profile:
http://www.excelforum.com/member.php...o&userid=14948
View this thread: http://www.excelforum.com/showthread...hreadid=278906