GetAsCurrency ( Label, Num, RedNegative )

Formats any number into currency

Be the first to rate this function Log in to vote

Kyle Williams - Show more from this author
Augusto Digital
https://www.youtube.com/channel/UCpJlB7cmVNMjbjgY96MEsng

Sample input:

GetAsCurrency ( "$", 112312000.1234, "" )
GetAsCurrency ( "$", -112312000.1234, 0 )
GetAsCurrency ( "$", -112312000.1234, 1 )

Sample output:

$112,312,000.12
$-112,312,000.12 //This will use the default text color
$-112,312,000.12 //This will show in Red text

Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

/*	Author:		Kyle Williams
	Date:		11/22/2021
	Purpose:		Convert any number into a currency formatted string of text
	Dependencies:	None
	Note:		RedNegative is a boolean value you can use to highlight negative numbers in red text
*/

Let([
	 Num = 0+Num
	;txt = Label & NumToJText ( Int(Num) ; 1 ; 0 ) &"."& Right("00" & Mod ( Round ( Abs ( Num * 100 ) ; 0 ) ; 100 ); 2)
];
	Case( RedNegative and Num < 0; TextColor ( txt; RGB ( 255 ; 0 ; 0 ) ); txt )
)

Formatting a number as currency has always been a challenge. This is the simplest formula I've been able to come up with for tackling this challenge...

Comments

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

GetAsCurrency ( Label, Num, RedNegative )

Comments

Support this website.

Support this website.