| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Formatting currency with the cents but without the decimal point
I'm using VB through MS Excel and I needs to export check information in a text
format. The bank is requiring that all fields take x number of characters, which I have been able to do except that the check amount needs to read 11 digits without the decimal place. ie: $247.84 becomes 0000024784. I can get it to 00000247.84 with the vAmt = Format(Sheet1.Cells(i, 4), "00000000.00") but the minute I take out the decimal, I get a decimal, I get 0000000247. Note: vAmt is: Dim vAmt As String |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Formatting currency with the cents but without the decimal point
Try
vAmt = Replace(Format(Sheet1.Cells(i, 4),"00000000.00"),".","") HTH Bob "mrbobader" wrote in message ... I'm using VB through MS Excel and I needs to export check information in a text format. The bank is requiring that all fields take x number of characters, which I have been able to do except that the check amount needs to read 11 digits without the decimal place. ie: $247.84 becomes 0000024784. I can get it to 00000247.84 with the vAmt = Format(Sheet1.Cells(i, 4), "00000000.00") but the minute I take out the decimal, I get a decimal, I get 0000000247. Note: vAmt is: Dim vAmt As String |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Formatting currency with the cents but without the decimal point
On Mon, 25 Oct 2010 05:56:54 -0500, mrbobader
wrote: I'm using VB through MS Excel and I needs to export check information in a text format. The bank is requiring that all fields take x number of characters, which I have been able to do except that the check amount needs to read 11 digits without the decimal place. ie: $247.84 becomes 0000024784. I can get it to 00000247.84 with the vAmt = Format(Sheet1.Cells(i, 4), "00000000.00") but the minute I take out the decimal, I get a decimal, I get 0000000247. Note: vAmt is: Dim vAmt As String vAmt = Format(Sheet1.Cells(i, 4) * 100, "00000000000") |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Auto Formatting Decimal Point | Excel Discussion (Misc queries) | |||
| Currency Rounding to nearest 5 cents | Excel Discussion (Misc queries) | |||
| How do I format to currency when number includes cents? | Excel Worksheet Functions | |||
| defined cell as currency but still have to enter decimal point | Excel Worksheet Functions | |||
| Currency Formatting to 3 decimal Places | Excel Programming | |||
Linear Mode
