Formatting Currency In A Subform Field After Value Set Via Macro
Aug 12, 2015
I have a parent form and a sub-form. On the parent form is a date field [JOINED] and on the sub-form there is a date field [DATE PAID] and a field [BQ JOINING FEE] with a default format of currency.
I created a macro to set the value of [BQ JOINING FEE] to 0 if ([DATE PAID]>[JOINED]+60). It sets the value to 0 as required but I am unable to get it to format the result as currency.
This is my first post so can I just say how great and useful this forum has been for me since I joined! I have found pretty much everything I have wanted without having to ask, so thank you everyone!
I am only beginning with Access at the moment, as I try to implement some improvements to the way my company works!
I have one really simple, but annoying issue at the moment and I cannot find the answer anywhere!
I have a currency filed in my table. I want to format it in USD, but USD is not available in the format options, just £ and €. I cannot see where the hell I get the USD $ format from?
I know this is probably well simple and I am being a plum!
I have a calculated field in a query that generates a result that i need to display in forms/reports with the $ sign but zero decimal places (ie; rounded to the nearest $ value, $5).
If i use the sql format currency function (format (n, "currency",0) it always displays the $ sign but with two decimal places...
In the form/report text box property i set the format to currency, with the decimal places set to 0, but it still displays two decimal places (this property setting seems to make no difference other than displaying the $ sign). Is there something i am missing regarding the way access formatting works?
I have some Conditional Formatting of a Currency Field in an Entry Form. The cell is conditionally formatted with a yellow background when the value is zero.
I now wish to add an additional condition to the expression such that even if the value is zero it will not be formatted if a specific check box is TRUE.
I have tried modifying the expression such that it reads;
[currency field]=0 AND [check box]<>TRUE.
It correctly turns off the conditional formatting if the check box is ticked, but does not turn it on again when the check box is unticked.
I have an unbound text box (txtInstAmt) that needs to be displayed from a table (tblLoan.fldInstAmt). Both the fields in the table as well as the text box have been set to Currency.
However, my code doesn't seem to work.
I get an error msg saying that the value isn't valid for the field when I set the decimal places to 2 in both the table and the form. When the decimal places are set to Auto, I get a Data Type Mismatch.
Can someone please tell me what's wrong with this code?
Code:Private Sub cboLoanSN_AfterUpdate()Dim DAOdb As DatabaseDim DAOrs As DAO.RecordsetSet DAOdb = CurrentDb()Set DAOrs = DAOdb.OpenRecordset("Select * from tblLoan where fldLoanSN='" & Me.cboLoanSN & "'")With DAOrsMe.txtInstAmt = .Fields("fldInstAmt")End WithMe.cboDateRepay.RequeryEnd Sub
Hi everyone, My query concerns Currency in that i have declared some variables as Currency but when i try to output them they appear only as if they are formatted as numbers i.e. £0.50 as a currency variable when displayed in a MSgbox displays as 0.5 not a big problem you might think but i am trying to output these numbers to a retail printer as part of an Epos application. i can add a £ sign to the beginnning but adding missing zero's to the end is proving a little more tricky. I have cheked that the international settings on the PC are set to English, £, 2 decimal places ETC Thanx
I need to have a textbox formatted to have 2 decimals. If I take general number and set the decimal to 2 it will display numbers like 89.1. I would need it to be 89.10. I would like not to use the currency format as it puts the $ symbol in the textbox as well. So basically same formatting as currency (because it's a currency I am working with) but without the symbol.
I have a main report with 5 sub reports. There is a detail page for each company and a totals page at the end. The record source for each sub report is a Union query (combines the detailed information with the total information.
One of the sub reports displays currency amounts. The detailed reports display the currency correctly: $26,001 (no cents). The totals sub report does not display the currency formatting: 468934
When I run just the totals query the amounts display correctly ($468,934) by using the CCUR(TotalAmount) variable type conversion. The VarType for the amount field in the totals query is 5 (double precision).
When I combine the detail query and totals query into a Union query the detail amounts display correctly but the total amount is missing the formatting.
Here is the union query.
SELECT TblCompany.TblCompanykey, FormatCurrency(ProviderCostsRetrieval([TblCompanykey],1),0) AS TotalCost FROM TblCompany ORDER BY TblCompany.TblCompanykey UNION ALL SELECT 9999 AS TblCompanykey, CCur(Sum(([QryRptProviderCostsDuringPeriod.TotalCost]))) AS TotalCost FROM QryRptProviderCostsDuringPeriod GROUP BY 9999;
When opening the main form I would like to create a macro that is able to set the property visible/not visible for a certain field if a certain condition on another field is satisfied. I Have Office 2010 and with the macro editor I'm not able to make it work. Need writing the text as in the macro editor?
Here below the example:
Main form name: FORM_1 Subform name: SUBFORM_2 Subform field: FIELD_ABC Subform field: FIELD_123 Subform field: FIELD_CHECK
Opening the form FORM_1, the macro must show the field FIELD_ABC and hide the field FIELD_123 only if FIELD_CHECK is equal to "TEXT OK" ...and the macro must hide the field FIELD_ABC and show the field FIELD_123 only if the field FIELD_CHECK is equal to "TEXT WRONG".
I wanted to use a conditional formating when in a subform the field "Field_Name" has the value "Case Status New" and then the field "New_Value" should become orange color.
I guess it can be put togheter like a formula (expression) in the Edit Formating Rule.
how to change default currency in Access 2013 to a "foreign currency" (i.e. to Indonesia Rupiahs) without changing control panel (Region/Language>currency) - now setup as USA ($US)?
I have a currency field that is not saving pennies. (cents if you're Americian i suppose) :confused: if i put in pence it rounds it to the nearest pound.
I have tried setting the decimal places to "2", but that makes no difference :mad: :confused:
the table is called invoice
this also happens with the invoice form :mad: (i suspect for the same reason)
The database can be downloaded from: http://www.tapestriesdirect.com/Garage.mdb (996KB) or if you can unzip (who can't?!?) http://www.tapestriesdirect.com/Garage.zip (86.1KB)
I have a field which is formatted as currency. When a button is clicked, it shows the value of the field. Because it is a currency field, if you enter "10", it is immedatly changed to "£10.00", although when i use txtAmount.Value, it gives me the "10" value. This is especally a problem if pennies are used - if someone enters "15.10", the .Value reterned is "15.1", which makes it seem like "15.01" has been entered. How can I get the currency-type value form the field?Thanks for any help.
I am importing a spreadsheet from Excel - the problem is that one of the columns in excel has a currency and text format (ex. $123,000 in B5 and 3M in B6). I know in Excel you can have both formats in one column since each cell can be formatted individually - how do I replicate this in Access?
If CIS = False Then CIS_Payment = "£0.00" Else CIS_Payment = "£20.00" End If
which works ok but what i want to do but do not know the correct way/syntax is:
If CIS = False Then CIS_Payment = "£0.00" Else CIS_Payment = "Labour_Total*18/100" End If
Where CIS_Payment and Labour_Total are currency fields, and CIS is a checkbox updated using an update query with the same info as detailed in another table (Couldnt get the conditions to work referencing the checkbox in the other table, so duplicated the box in both tables and used a query to sync)
I would like to know is there a way to create a mask on a form for a currency field? I don't want a user to be able to enter in like 125.145. I just want to make it so that people can only type in 125.14. Or how can I write VB code to give a warning when a user enter in more than two decimal places.
I would like to know is there a way to create a mask on a form for a currency field? I don't want a user to be able to enter in like 125.145. I just want to make it so that people can only type in 125.14. Or how can I write VB code to give a warning when a user enter in more than two decimal places.
I have this expression I created and I want to know how to format it as currency. I know how to do it with a regular field but the option is not available for an expression.
The expression:
Code : Charge: IIf([Rate] Is Not Null,[Rate],"0.00")
I've got a form with a subform on it that has a subform on it (nested subforms - Customers form with computers subform, which has a software licenses subform on it)
I'm trying to put a button on the top-level customers form that will jump to a new record in the software license subform-subform (the licenses form is displayed as continuous with a blank at the end for new license entry). I want to set the OnClick action to move the record selector on the software licenses subform to the last (new) record in the continuous form display. I can't figure out the appropriate path to use as the Form Name in my GotoRecord macro.
Is there a special trick to use when referencing subform controls?