I'm using Dmax() to return a max number in a field which I then want to inc by 1 for a new record. Dmax is returning 999. I believe Dmax therefore thinks it's a text field. So where do I change this to a number field?
View RepliesI have a table, tblEvents, which I use to store information about a meeting, training session or field trip, including the [StartDate]. I also have a table, tblEventDays, which I use to store the [DayNumber] 1, 2, 3... At the moment I have to enter the day numbers in the subform frmEventDays manually, but I would like to add button controls to increase/decrease the number of days for each event (i.e. add a new record where [DayNumber] is incremented by 1, and delete the last record if I have added too many day records).
I have added button controls to my EventDays subform and managed to use the macro builder to select and duplicate the last [DayNumber] record, but cannot figure out how to increase each successive [DayNumber] by 1.
1. Add a day...
Option Compare Database
Private Sub AddDay_Click()
?
End Sub
2. Remove a day...
Option Compare Database
Private Sub RemoveLastDay_Click()
?
End Sub
I just came across a problem that I didn't recognize before. I had an invoice table and corresponding form that had an autonumber for the invoice number. The problem now is that I would like the invoice number to begin at 256 and then increase incrementally, because I had some previous invoices from my books. How to go about doing this.
View 5 Replies View RelatedHow can I add an ID-number that always increases (by 1) each time I add a new record to a table (using a form)? I want to always use some info from the record that was added last to fill in a different form. The reason for my question is that I heard that the autonumber does not necessarily increase each time a new record is added...
View 1 Replies View RelatedI have a database which has a main form and subform built in linked by parent/child customerid, what i would like to do is search all the subform records from the whole DB and return its parent record on the main form?
Can this be done? because if i use find it will only search the filtered form i have onload of the form?
My onload event is based on fosusername()
I am wanting to make a text box on a form, to return a number (amount of records returned by a query)basically so if the query returns 5 records, the text box on the form will show"5",
Lets say the form is called "A", and the query is called "B" .How do I put this in the source control of the textbox ? < if this is right too ?
Is it possible to increase the number of columns in Access 10?I upgraded MS Office because I knew Excel no longer restricted you to 256 columns. I often pull data from a data base that uses as many as 800 columns.When I try to open these files I get a "too many cross tabs" error prompt.
View 2 Replies View RelatedI have a form with multiple fields on it. We will call them SLO
They are text boxes and there are 6 of them named SLO1, SLO2.....SLO6
What I want to do, is use VB to update each as a string to a table individually. But Id like to only type the code once, and use a DO WHILE and increase the value by one. Example.
Current Code looks like this:
Private Sub UpdateButton_Click()
Set rstNewInventoryDataRecord = CurrentDb.OpenRecordset("Select * FROM MetricData")
Set CurrentForm = Screen.ActiveForm
Dim Counter As Integer
Counter = 1
rstNewInventoryDataRecord.AddNew
rstNewInventoryDataRecord.SLO = CurrentForm.SLOT1.Caption
rstNewInventoryDataRecord.Update
MsgBox "Update Complete"
End Sub
What I want to do is use the counter to increase by one after each loop and stop after 6. So...Do while Counter < 7
And increase the CurrentForm.SLOT1.Caption by one each time.
I've tried
rstNewInventoryDataRecord.SLO = CurrentForm.SLOT & Counter.Caption
and
rstNewInventoryDataRecord.SLO = CurrentForm."SLOT" & Counter.Caption
As well as a few other ideas all to no avail. Is this possible?
I'm trying to get an invoice number field to auto generate the next number, keeping the format as "00000"...this is what I have, which gets the next number but drops the leading 0
Code:
Private Sub Customer_AfterUpdate()
If Len(Me.[InvoiceNumber] & vbNullString) = 0 Then
Me.[InvoiceNumber] = (DMax("[InvoiceNumber]", "[tblInvoiceNumber]") + 1)
DoCmd.RunCommand acCmdSaveRecord
End If
End Sub
invoice numbers are 04024, 04025 etc...how I keep the formatiing?
I have a subformClientOffers on my frmAllProperties. On the subformClientOffers is a field called Outside Agents. This field allows for multiple values to be selected.
The subfrmClientOffers is in datasheet view.
While the field Outside Agents DOES allow me to select more than one, they post in the field one after another:
Ken Shaw, John Doe, Jane Doe, Harlan Bestlyn
Therefore, the datasheet view of the subformClientOffers causes the field Outside Agents to get very long, much too long to view without scrolling. My client wishes for everything on the frmAllProperties to be viewable without scrolling.
Is there anyway, to cause the field Outside Agents to place a return between each selected name (sort of a wrap text kind of thing)?
One thing I might mention is that the field is a drop down field from tblOutsideAgents. The table itself has First Name and Last Name, but I concatenated that into Fullname on the form, so that when the user opens the drop down they see the entire name. I don't know if that would have any effect on making the 'return' thing work or not.
I can't use this field as a subdatasheet because I already have one subdatasheet attached to the subform to show multiple notes on each Client Offer.
Please help if somebody knows the way to increase the character limit of field from 255 to max. possible.
Thanks
Navkesh
How to increase field size in a certain table from 10 to 50 from Database (programaticaly).
View 1 Replies View RelatedI am having a problem with retrieving the information I am looking for. Basically I am checking to see if a user has selected a TRNumber from a drop down menu and if that TRNumber matches any other records in the table in that field. If it does, is that Number already associated with the user selecting it. If it is I want to get the ID number so I can simply update the record with new information. Here is what I have so far.
Code:
Dim Rs As DAO.Recordset
Dim Tech As String
Dim MsgStr As String
Dim IdMod As String
Set Rs = CurrentDb.OpenRecordset("PrepStartDateBlankQuery")
[Code] .....
What is the best way to allocate a record number to the end user?
I have had problems where users have come back to me saying that both of them created the same record number at the same time and I am not sure why that is happening.
To be certain, I am using INSERT rather than UPDATE which was my initial concern (an update would just over write the previous record)
How can we check the last value, uniquely assign that value to a person at the point of creating the record and ensure that no one else can take it...
Is it possible that a laggy server would cause these issues? (as the code executes roughly the same time as another person also executes code, they overlap?)
When I create a new record I am also generating a new Auto Number. This is so I have a sure fire way of returning the records that I want to return. I have read where it is a known issue that when using the Compact and Repair it can reset the Auto Number to a lower number and generate a duplicate Auto Number. That is the problem that I have at this time. I have tried using the Allen code but it doesn't seem to worked on linked tables. I use linked tables because I have multiple users who can access this system at any given point in time.how to have the Auto Number field select a number that is unique
View 12 Replies View RelatedI am working on a database where the records are numbered sequentially. On a regularly basis, records will be deleted leaving a gap in the record number sequence. I would like to have my db recognize that a number(s) is number in the sequence and use the missing number (filling in the gaps) when a new record(s) is added until all spaces are filling and then to continue from the largest number sequentially.
View 2 Replies View RelatedI want to return the number of record with the SQL search in MS Access. I am using the following code, the expected result will be a value. But somehow, it does not give any result.
StrSQL = "SELECT COUNT(*) FROM table1 WHERE [Condition]='A' "
How do I return the count value with the search?
I have three tables which I have linked with relationships. The linked fields are given the ID number of the parent, where I wanted the value. What on earth am I doing wrong, something stupidly obvious I bet! Access 2007
View 3 Replies View RelatedI have a text field with numbers like this: 2014556682 or 2014236781, etc.
My problem is that I need to insert 00 between the 2014 and the last 6 numbers.
I have a data where I want to create a query fulfilling the below conditions. Suppose I have two table: Table 1 and Table 2 If a value ex.98 (Table1) matches with the value with 98(Table 2),it should pick up my second higher value 103. suppose 103 is the next high value of 98 . Please see the data value.
misprepaid.asmvalue from Table2 Required Result Con 989898 then 103
if value of table1=98 then 103 from table 2 (next large number) 103103103 then 149
if value of table1=103 then 149 from table 2 (next large number) 149149149 then 175
if value of table1=149 then 175 from table 2 (next large number) 175175175 then 198
if value of table1=175 then 198 from table 2 (next large number) 198198198 then 199
[Code] .....
for example how can I extract the following number from the field ITEM 117145 5410076462162, 714774 117072 5410076462223 ,714768 117153 5410076462285,733289 998214 5410076462193 from this record. The field is memo. The common: the string "+" always is in front I tried this Expr2: InStr([ITEM],"+"), but it only give me first one.
The following is record
BARCODE Retail Line Code NSL Code Prod Ean Name Size Facings Capacity Pos Comments Offer Description Offer Type Offer No 5ELKAHQ*agiaji+ 714766 117145 5410076462162 NS PRNGLS SUR CRM AND ON 190G 3F 15 BUY ONE GET ONE FREE MV 105574 5ELKAHQ*agiagh+ 714774 117072 5410076462223 PRNGLS ORIG 190G 3F 15 BUY ONE GET ONE FREE MV 105574 5ELKAHQ*agiddd+ 714768 117153 5410076462285 PRNGLS SLT/VNGR 190G 3F 15 BUY ONE GET ONE FREE MV 105574 5ELKAHQ*agibia+ 733289 998214 5410076462193 PRNGLS BBQ 190G 3F 15 BUY ONE GET ONE FREE MV 105574
I would like to be able to copy a single record in a table and then paste this record a pre-defined number of times 10,20,30 depending on requirements. The reason I need to do this is that I want to set up a number of identical records that can easily be amended into unique records. This will vastly reduce the amount of work and time spent entering records individually.
The only way that I have been able to achieve this is to copy and transfer the master record into Excel, and then copy the row and paste it into a range of cells. Copy the range of cells back from Excel and then paste this range back into the Access table.
This works but is long winded; what I would like to know is is there a simply way of achieving this.
I am pretty new to MS access and have a question that I have not been able to figure out. I am making a database with a form to input the data in to the database. The only thing is I want to be able to search/lookup/record data by the products ID code and not by its record number. For example, product 1234 instead of entry number 1. How would I go about this? Thanks for your time!
View 1 Replies View RelatedHi, basically what i want to do is append a record to a table using vba. I would like to take two values from my form (productID, supplierID) and insert them into a table (supplierProductsTBL) under the same headings. I've constructed an sql statement but am getting the following error:
runtime error '3346'
number of query values and destination fields are not the same'
I think this happens because the table also contains an autonumber field (supplierProductID) and i'm not referencing this in my sql statement (below):
mySQL = "INSERT INTO SupplierProductsTBL ( SupplierID, ProductID ) VALUES ('" & SupplierID & "'), ('" & ProductID & "')"
i wuld just get rid of the autonumber field but i need this.
Any help on this would be appreciated, cheers mark.
In access (2003) I am setting up a table with Employee # (Pri. Key), senority numbers..and
so on. However I cannot figure out how to reset the senority numbers when one leaves. For example Bob is #235 senority and leaves (By retiring, quits or gets fired)..well Mary was #236 and now should be #235 (because Bob is no longer at the company)..and so on with everyone else below Bob getting their Senority number changed by one.>
Do you have any ideas..I tried autonumber, but it will not do that.
I am new to using access but have managed to build a database that I use to find qualifiers for horse racing based on stats I import for all the racers in the days racing. I have a query which shows the date, time, track, horse and trainer but some races have more than 1 selection so I want to add a field that counts the number of qualifiers per race. I am finding it hard to do a countif, date AND time & track are all the same within that query.
I also want to add another show the total runners in the race but this will have to look into the tables where the query is run from. Hopefully I can figure this out when I find out how to solve my original problem.