I need to have the pound sterling symbol ( £ ) in a field, but only have two options 1- Dollars ( $ ) and 2 - Euros .
I have done a search but cant seem to find out.
How can I get pounds or change one of the others.
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.
View 1 Replies View RelatedI have several reports where the currency was always reported in dollars so for the fields in question I had a format of $#,###.00 which printed the dollar sign in front of the amount.
As the system has now become more sophisticated I need to print out a currency symbol depending upon the client. I have a currency table that links into the client so my query 'behind' the report holds the right symbol but how do I get it ito the report. I Know I can define a second field that will hold the symbol but to me this is a clumsy way of doing it. Is there anyway I can put the symbol in the control source for the data or into the format of the field or some other way?
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)?
View 3 Replies View RelatedI have created access database having field currency but it shows currency in $ by default I want to changed it to Rupee. How could it do?
View 1 Replies View RelatedThis may sound I guess you could say stupid but...... Is there a way to add a less than symbol in a colum and still keep the value a number rather then text?
View 6 Replies View RelatedHello,
I've got a small form with one field called 'Price', this is set as a Currency type in the table design. How would I go about ensuring that the field (in form view) always starts with the '£' symbol...would this be an input mask or would it be something on the form?
Thank you for any advice :-)
Hello,
I have been trying to find the symbol or text to force a new line on a command button in a Access Form and have not had any luck. I have the command button pretty large and want 2 lines in the button. If anyone knows how to do this that would be great. Thank you very much !!!
I have a form where I combine several fields in 1 textbox. At the end there is an amount. It should look like below:
The total cost of the products is EUR 29.342,45
I have the following formula in the textbox:
Code : =" The total cost of the products " & [Currency] & " " & [TotalPrice]
It would be great if the TotalPrice could be with the dots and coma in the correct way.
I tried to format it, but it was giving me nothing, the numbers stayed the same.
Is it possible to convert a number (whether in the "Standard" or "Currency" format) into words ?
View 5 Replies View RelatedI need to create a SIMPLE solution for Retail rounding. Below are is an Example of Detail lines in a DataSheet Form that represents the price for an Item.
QuantityXUnitRate = Quantity * (UnitRate*Pct)
$14.0049 = 1 * $10.53 * 1.33
$14.0049 = 1 * $10.53 * 1.33
I need the price to end with a Currency Decimal of $$$$$.x9 for all prices. The example above rounds to $14.00 for with 2 digit rounding or if I use 3 digit rounding $14.01.
I need it to be rounded with a .x9 either $13.99 or $14.09 or to the nearest .x9.
Subsequently, every Detail line we calculate in the Datasheet needs to end with an .x9 for Retail Pricing.
There are thousands of different UnitRates (costs), and the Pct (Percent of Markup) can also change.
Additionally, I sum the Detail Lines and the Totals need to match. One of the Sum Fields is Calculated as
=Sum(IIf([taxable]=True,Nz([QuantityXUnitRate]),0))
This ends up Totaling to $28.01 which is wrong for 3 Digit rounding of the Detail Line, because $14.01+ $14.01 = $28.02.
I also tried Rounding
=Sum(IIf([Taxable]=False,Nz(Round([QuantityXUnitRate]),0),0))
And after that I still got the wrong amount $28.00.
I tried this with 2 instead of 0 with no difference
=Sum(IIf([Taxable]=False,Nz(Round([QuantityXUnitRate]),2),2)),
I know one of 2 refers to the Nz and the other to Rounding, but I not sure which is which at this point.
If the last significant digit need to be .09 or .19 or .29 or .39 or .49 or.59 or.69 or.79 or.89 or.99 then everything should Sum up correctly or I hope.
Here is another Example
QuantityXUnitRate = Quantity * (UnitRate*Pct)
$14.0049 = 1 * $10.53 * 1.33
$22.2642 = 1 * $16.74 * 1.33
However, I get the correct Detail Line of $14.01 and $22.26
and using =Sum(IIf([taxable]=False,Nz([QuantityXUnitRate]),0)) same as above, I get the correct amount $36.27.
How to make a with a SIMPLE solution where all Decimals end up with a .x9 and then I'll tackle the Sum if necessary.
I am tying to query the Symbol table to see if a recod exists with symbol code.
I am querying the tblSymbol table from Excelk vba and the Access DB is on my machine.
The code I am using is:
Set rs = New ADODB.Recordset
rs.Open "tblSymbol", cn, adOpenKeyset, adLockOptimistic, adCmdTable
Set rs2 = New ADODB.Recordset
sql = "SELECT * FROM [tblSymbol] WHERE [SymbolCode] = """ & someSymbol & """"
rs2.Open sql, cn, adOpenDynamic, adLockOptimistic
[Code] ....
MsgBox Exists always returns -1 but i know the code exists in the table.
I have an unbound calculated field [Txt1] that I would like to show the result as currency. The fields in the calculation are:
[CR] number, currency
[Commission1] general number, two decimal places
[Commission2] general number, two decimal places
The calculation is: CR15W * (1 - Commission1) * (1 - Commission2)
If I just set the field to currency it works fine. But I want the field to show the following:
"Some Text" & " " & Format(Calculation, "Currency")
When I tried to include the format it to currency I get type mismatch, run time error 13.
So I thought that perhaps I should try the following just to see where my error starts and I get the same error message when I use:
Dim Val1 As String
Val1 = CR15W * (1 - Commission1) * (1 - Commission2)
Txt1 = Format(Val1, "Currency")
Everything I have read says the formula is:
Format([Calculation], "Currency")
Is correct. So why won't it work for me?
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 am trying to change the button color on a subform if a related form data changes.Main form is products with a continuous subform with serial numbers of products i.e, serial number, location, price and a button to add addtional issues if there are any for this particular serial number (this will open up another form related to the serial number so I can add an issues if there are any).The reason I would like the button to be a different color is so I can quickly see if there are any additional notes been added to the serial number. Just in case you may ask why not add the field to the continuos form is that the issues and be quite lengthy and there may be lots of serial numbers on the form
2346 location warehouse price 29.99 (button - green)
2347 location shop price 29.99 (button - red)
I previously created 2 tables:
One lists all the stock symbols and company names = SYMBOL
The second table lists the purchase information for each stock = PURCHASE
I then created many queries, etc. using this data. Symbol is the key link between the various tables, queries, etc.
NOW that I understand the lookup wizard in the data type, I would like to change the symbol field in the purchase table to a Lookup field. I, of course, receive a message. I am told to delete the relationship with the other tables. If I remove the relationships and change the data type, can I then replace the relationship with out damaging all the queries and forms?
I have a form that launches a query. The results are displayed in a continuous form called ParentForm. On the ParentForm is a combobox which selects a singleform called a ChildForm that displays the details of the selected record. I placed a command button on the ChildForm. This button simulates a circular triple state toggle switch. By clicking this switch the form goes from ReadOnly to Edit to Add modes. The form properties AllowEdits , Allow Additions and DataEntry are adjusted accordingly. These properties when they are changed seem to initiate requery of the underlying data source. Here is the code. I am looking for a way to avoid requery of the data when the mod is changed.
Code:
Private Sub ModeBt_Click()
'-------------------------------------------------------------------------------
' Circular toggle button to change display mode of the form
' ReadOnly - Edit - Add
'-------------------------------------------------------------------------------
Select Case Me.Mode
Case "Edit Mode"
Me.AllowEdits = False
[code]....
Ok, so I was wondering if there was a way that only certain text boxes show up in a form based on the record.
For example, in my products form there is hardwood cost, trim cost, fireplace cost, but only some products apply to each of those. How do I do it so that if the record refers to a fireplace all you see is the fireplace cost textbox and not the other two?
Is it better to have seperate tables? But they are all products so I thought they all go in one table.
Also, I would like a box named retail on the form which is basically the cost x2, I know how to build the expression but I would like it if it would multiply the hardwood cost by 2, if there is no hardwood cost then it chooses the trime cost, and so forth for the fireplace cost. Also, sometimes there is a retail price that does not need any calculations at all..how do I incorporate this?
Is any of this possible?
thanks very much in advance for any help.
I have set up a number field to enter in the amount of money we have spent on a particular project, and when I enter, say £645.18, once I press TAB to move to the next field, it reverts to £645....
I have the decimal places thing set at 2, and the format on currency......
A few years back I saw a program which helped with database changes. I want to change names of fields and tables, queries etc. in a rather complex database. Does anybody know where I can get this tool or program to run through the database and change it in all corners and crevices on a search and replace basis?
Thanks
I'm trying to change a rowsource depending on the value in a form. I want to be able to change the value and update the form accordingly. I can change the query but when I try to add the "where" statement to it, I get nothing.This is what I'm using:
Private Sub RepID_AfterUpdate()
Dim strSQL As String
strSQL = "SELECT DISTINCT [Cust No] & ' ' & [Name] FROM [Address Book] WHERE [Address Book].[Cust No] = '" & [RepID] & "' "
Me.NamesList.RowSource = strSQL
NamesList.Requery
End Sub
How can i change the combo box fields headings. by default it comes according to the table/query field name. I need to put some thing meaningful.
View 6 Replies View RelatedUsing Access 2007 DB windows 7..Main form on open of db collects the username from the environ. text Field(networkid) is populated on form from the function
1. On Open of DB it opens with a frmuserid which contains a text box holding the network ID which is derived from function fosusername()
2. The value of Forms!frmuserid!networkid (frmuserid! is the form that opens when the DB is 1st opened) is populated with the fosusername() in the networkid text box
I seem to only be having the issue of the db opeing with my network ID no matter who opens the db. Somehow I need to shut off that 1st ID when close db or update the form field on open.
I maintain a large database of employees. I have a form with a combo box (cmb_department) which I can use to select a particular department. I have written an After Update event procedure which updates the relevant fields on the form after I've selected a department - e.g. their new manager's name, phone number, etc. based on my departments table.
Here is my code, which works well:
Private Sub cmb_department_AfterUpdate()
If (Me.is_leaver = "" Or IsNull(Me.is_leaver)) And (Not IsNull(Me.employee_number)) Then
MsgBox "This member of staff is an internal HEY employee. Their departmental details will not change to that of the department, however they can still be set up with GP Browser access."
[Code] ....
However, I'd like to do two things which I'm currently unable to get working...
1. If I delete the department name from the box, or select a NULL value, I get a VBA error - run time error 94, invalid use of Null. I will sometimes want to select a Null value to "unassign" a person from this particular type of department but I'd like a way of selecting a Null value and having it simply set to Null which if the form's default value for this field.
2. As you can see I have a MsgBox which checks to ensure you want to overwrite the existing data for the member of staff. If I select Yes then it overwrites. If I select No I'd like for it to set the value of cmb_department back to the PREVIOUS value. At the moment my script sets it to NULL which doesn't really work - for example, say someone is currently set to the Sales department, and I accidentally click to change them to the Warehouse department, I'd like clicking "No" to revert them back to Sales...
I have set up a form that allows me to enter information on an item. This form is for initial entry, like an asset item. In this form I have a field for status of the item and the condition of the item.
Where I am having trouble is being able to bring the item up and change the status of the item if it is broke or damaged. I have the item as [label] and set as the primary key. and an item as [studentid] as a foreign key. I also would like to be able to query the different status'.
I am confident I can set queries up but I need to figure out how to recall the [Label] change the [status] and save it. The only other thing that I could hope for is to track then number of times the [status] was changed.
I have a list of patients that are seeing various clinicians in a clinic. Currently everything is on paper and when a patient arrives we highlight their name on the list. So now that I'm finally moving everything paperless, I want to have the record become "highlighted" when I select patient has arrived. The only problem is as it's a continuous form, the formatting changes on all records. Here is the screenshot before anyone arrives:
Those are two separate records that you see. Behind all of those fields is a box coloured #E7F442 (optic yellow-ish). What I want is when I select "Arrived" from the dropdown, for the fields on the left (name, number, appointment type, etc) to become transparent so the yellow shows through and looks highlighted. I've used this code:
Code:
Private Sub ATCST_AfterUpdate()
If Me.ATCST = "Arrived" Then
Me.RGBCHID.BackStyle = 0
Me.PATNAME.BackStyle = 0
Me.TCDESC.BackStyle = 0
Me.VISPURP.BackStyle = 0
Me.ATCMNT.BackStyle = 0
Me.ATTIME.BackStyle = 0
Me.ATCST.BackStyle = 0
[code]....
Making the whole code utterly useless, as it's changing the formatting on every record. Is there a way to program this so the formatting changes only affect the record I'm working on at that moment?