I have a bound subform that lists all of the relationships from my unbound txtJobNum control and I can add and delete lines from the table directly on the subform. What I really need is to NOT update the table unless I click on my save command button.
View RepliesI am getting a problem with delete button..I want to delete record from subform and Table..
Table:Payroll
Subform:PayrollSearchQuery
Form:Payrollog
I am giving the code is ....
Private Sub Command58_Click()
'check existing selected record
If Not (Me.PayrollsearchQuery.Form.Recordset.EOF And Me.PayrollsearchQuery.Form.Recordset.BOF) Then
'confirm delete
[code]....
I have a sub form that allows users to add staff to a project team, once added it populates a table which updates the subform showing the selected employee. I am trying to enable a delete function that allows users to remove an employee from the project team in the subform showing selected staff. Here is the code I have so far, but it doesn't work;
Code:
Private Sub Command4_Click()
Dim dbs As Database
Dim rs As Recordset
Dim sqlstr As String
Set dbs = CurrentDb
sqlstr = "DELETE tbl_CapexStaff.* FROM tbl_CapexStaff WHERE CAP_ID = Forms!frm_Switchboard.CAP_Live"
dbs.Execute (sqlstr)
End Sub
I have a parent form and connected to it is a subform. On the parent form I have a checkbox which enables and disables fields on the parent form and also hides the subform.
What I want to do is when the user unchecks the checkbox, this action also deletes the associated subform records, if there are any.I'm sure that this can be done with an SQL Delete query in VBA.
Here is basically what I have and what I need to do:
I have a form with several text boxes which are going to be filled in. Clicking on a button at the bottom of the form will save this information into a table (the table associated with the form). However, it also needs to fill in a junction table with two known values derived from these text boxes.
I have FILE_NUMBER_CD and INSPECTOR_NUMBER_CD that are the only attributes in the table called "XREF_FILE_INSPECTOR" which need to be added as new records.
So basically, what I need to know is how do I add known values derived from a textbox directly into a table.
Thanks for any help!
Hi
I have a form, which displays data from a query recordsource.
One of the textboxes is a "Comments" textbox, which I would like the user to write in directly, which in turn is a direct link to the data in the table so it is updated immediately.
At the moment, the textbox does not seem to be editable. Is there a standard way to do something like this ?
In fact, I have one principal d/b running on my access, ad/b which I had imported from my iPad... The import went smoothly enough but I face this problem. I usually scroll the table in order to locate a patient's name.
I can't find a way to select this line and have it switched to a card view in order to update it. I need to move to card view, search from there in order to locate this person in card view. I am sure there is a way to select a line ( a record) in table view and jump from there directly into this record in card view.
I've created a report which has 4 subreports linked to it via a ClientID. The problem is it prints 2000 reports for the 2000 different ClientIDs. I want, went the button is pressed, for it to ask what ClientID the users wants to print the report for.
I know how to do this in a query based report via criteria, buthow to get this to work when the reports been directly made from a table.
I am trying to make my form open directly when i open my access file.accdb. When i double click on my .accdb can it be done to open directly and only my form. I found a way to open my form but it opens the access program in the background.
View 7 Replies View RelatedI work at a hospital and I have been able to copy and paste data from a patient list into an Excel spreadsheet into a list I can customize to track patients I work with. I had a macro that would take the data copied and pasted and organize it in the way I needed it in a design that works for me.
I'm trying to convert this system to Access to give me more control over the data and to try and make the process of creating the list a little more automated. I also have an Access database for "tracking", which is required by hospital management so I was hoping I could use the patient list database to streamline the process of entering interactions into the tracking database.
I'm not sure how to get the copied and pasted patient list into an Access in a way that will let me manipulate it in Access to do what I want it to do without having to add several steps of a) pasting it into Excel, b) importing the spreadsheet into the Access database, and c) cleaning the data that ends up in the final Access table.
Is there a way to import data in a spreadsheet or table format directly from the clipboard, which would allow me to skip Excel altogether? I'm using Access and Excel 2010.
The purpose of this database is to have a simple form that inputs data into a table. There is a subform view on the form so they are able to see their data that was submitted into the table.
Problem:I have made an attempt at making a Delete Row button. The idea behind this is to allow them to select a row on the subform view and then delete it from the table.
Form = frmEvaluationForm
Subform = frmReviewSubForm
Table = tblEvaluationDatabase
figuring out what is causing this error 3075 (syntax error in query expre. Is there a more specific way to delete a row that has been selected?
Access 2007
Code:
Private Sub cmdDelete_Click()
'check existing selected record
If Not (Me.frmReviewSubForm.Form.Recordset.EOF And Me.frmReviewSubForm.Form.Recordset.BOF) Then
'confirm delete
If MsgBox("Delete this record?", vbQuestion + vbYesNo, "Delete") = vbYes Then
'delete now
CurrentDb.Execute "DELETE * FROM tblEvaluationDatabase WHERE CAccount = " & Me.txtCAccount
'refresh data in list
Me.frmReviewSubForm.Form.Requery
End If
End If
End Sub
I have a form to add, edit, and delete Records from a table. I am using the following VBA
Private Sub cmdEdit_Click()
If Not (Me.frmlEmpDetailsSub.Form.Recordset.EOF And Me.frmlEmpDetailsSub.Form.Recordset.BOF) Then
With Me.frmlEmpDetailsSub.Form.Recordset
Me.txtAddEditname = .Fields("Name")
Me.cboRoster = .Fields("Roster")
Me.cboPermFctn = .Fields("PermFctn")
End With
End If
End Sub
Instead of referring to the Subform to load the data i would like to refer to a combobox:
cboSearchName
Its not an issue but This Combobox contains 5 columns...
Hi. (I already ask how to delete rows but it looks too hard to make so I invent new idea)
How I can add lines (INSERT INTO) into table so that Access does not add lines which already are in the table??
Rather than manually draw vertical lines on my forms, I'm looking for a way to generate vertical lines using VBA code. Has anyone done this?
Thanks,
pc
My boss made a satisfaction database that tracks satisfaction in 2 ways, so we have:
Table
ID
SatisfactionAType
SatisfactionAScore
SatisfactionBType
SatisfactionBScore
I'd like to make a query that would split these into two lines, one for A, one for B and then export it to excel.
I would like to know if it's possible to open an specific subform inside a navigation form using an event.
I also need to to this using macros ( really can't use vba in this project =/)
Form example:
the main form has "nav_opt1", "nav_opt2", "nav_opt3"
By double clicking a record in "nav_opt1", it will open "nav_opt2" with some filters (but all in the same window), as if I was just browsing through the navigation forms usually.
I want to create an access spreadsheet form in which the user can add data, which will be - after being processed - added to a database table. The spreadsheet form is for this reason not directly linked to a database table.
In the spreadsheet that I actually have, I manage to copy paste data from an Excel spreadsheet. However, only the first row is pasted. Access doesn't add new record lines for the other rows of my spreadsheet.
How can I make Access add record lines in function of the data on that is pasted? Or if this is not possible, how can I add sufficient additional lines myself?
I have a form that I'm using as a subform as well as a subreport.
I would like to have dividing lines in the subform, but not the subreport.
Is there any way of doing this other than just creating a duplicate form with a different name?
Ive had a recurring problem with one of my databases
ive got a form with a subtable on it, the subtable is very important as much of the DB's data is entered in there.
every once and a while one of the users will be doing data entry and on a certain field (a short text field if that makes any difference) theyll push enter instead of tab, to move on to the next field, enter creates a new line instead of moving to the next field, when a new line is created the user will either assume the field is blank and retype the data or ignore it entirely and move on
the trouble is one of my queries completely fails to work when there are multiple lines in this field (comes with a data type mismatch error)
is there a way to prevent the field from being able to contain multiple lines (like a property setting or some VB code?)
I have created a forum that all fields are unbound. On completing it is written to the table using a RunSQL command. This writes to the table with no problem but when it does so it is creating another entry with zero content. This is the save steps with open new form
Code:
Private Sub SaveRecordAddNew_Click()
Call PreSaveCheck
If Me.saveCheck = False Then
Exit Sub
Else
Call WriteToTable
[Code] .....
in my report I have table made from 25 fields (5x5) and they all have the Can Grow Option turned on.
However the lines and boxes separating the fields do not grow with my fields and I get plenty of intersections and over lapping.
Is there a way to make boxes and lines grow with the text box?
I am unable to break the UPDATE statement into multiple lines and now I am getting "Syntax Error in UPDATE statement"
Following is the multiple line Update Statement
Dim strsql As String
strsql = "Update tblcurr" & _
"SET tblCurr.Currencyname =" & _
"[forms]![updatecurrency]![txtcurname]" & _
"WHERE (((tblCurr.Currencycode)=" & _
"[forms]![updatecurrency]![txtcurcode]));"
DoCmd.RunSQL strsql
Following is the one liner Update statement which, works perfectly
strsql = "UPDATE tblCurr SET tblCurr.Currencyname = [forms]![updatecurrency]![txtcurname] WHERE (((tblCurr.Currencycode)=[forms]![updatecurrency]![txtcurcode]));
The purpose of my database is to keep a record of training activities undertaken by staff. There is therefore a multiple form which displays, for a specified worker, the list of all the required activities. Each line has a button which opens another form to allow an activity to be started (together with start date and other info). The main tables are Worker, Activities, and a junction table Worker2Activities. On closing the second form and refreshing the first one, the started activity is correctly recorded, but on as many lines as there are staff on the course. To make matters worse, these also appear when i then select another worker (and if i create another worker, the number of lines goes up by one for all of them). The Worker2Activities table correctly show one new record created
View 3 Replies View RelatedI have two tables that need to be exported on one .txt file.
One table has the header record. And the 2nd table has the detail record.
My issue is as follows:
1. Need to create one .txt file
2. The header record has one set of export specs and the detail record has a different set of export specs.
3. The first line is the header record, and 2nd line is the detail record.
Example below:
H Abraham Armenta January Cake 00123
D Father Saturday 02536 00123
Both tables have a common control number - in this case represented by the 00123. I just cannot figure out how to accomplish this..
I have a multi select listbox that I rebuild as I index thru some products in another listbox. This listbox then gives me the ingredients I can use. Works well, but the ghost selections in the listbox stay hilighted even after the rebuild.
I can select and de-select at will if there are actual items in the list box, but the ghosts remain.
Here is the code to clear the listbox
Dim _
ctlSource As Control, _
varSelected As Variant, _
intListCount As Integer
Set ctlSource = Forms.frm_select_UPC_LoinGrade!lstBox_ColdStorage
For intListCount = 0 To ctlSource.ListCount
ctlSource.Selected(intListCount) = False
Next intListCount
Forms.frm_select_UPC_LoinGrade.Refresh
Forms.frm_select_UPC_LoinGrade.Repaint
I have several tables linking our employees to certain supervisors, etc.On the Form, there is a drop down with all employees listed that someone can select and then enter the stats required. When someone leaves the firm, I want to remove them from the form dropdown list, but not delete them from the corresponding table. I have seen this in other databases where they someone added an 'Inactive' column with a Yes/No response and when you selected the inactive - yes, that name would disappear from the form when people select names from a dropdown to enter stats.how to make the names disappear from the view in a form, but not in the table related to that form?
View 6 Replies View Related