In the form is the table tbAssembleias, but I want to put from the other table which is not present in the form:
1. a control that count how many are present (= yes)Ex: Appearances 22. a control that sum the votes of those presentEx: Votes 9I already have a query that count how many are in the meeting, but cant realize how to pass the information to the field in the form..This is the SQL view of the query with the real field names - and working: SELECT Count(tbEntidades.tbAssPresente) AS ContaPresentes, tbEntidades.tbAssPresente FROM tbEntidades GROUP BY tbEntidades.tbAssPresente HAVING (((Count(tbEntidades.tbAssPresente))=True) AND ((tbEntidades.tbAssPresente)=True));
I would like to copy one control, then close this form, open concrete form and pass value to control.
My code is
Private Sub Menu_Click() DoCmd.OpenForm "frmZleceniaMarzenaNawigacjaPD" Forms!frmZleceniaMarzenaNawigacjaPD.Form!Imie = Me.Imie Forms!frmZleceniaMarzenaNawigacjaPD.Form!Imie.SetFocus DoCmd.Close acForm, Me.name End Sub
The problem is, still opens the previous form, not form "frmZlecenia"
e.g If I open form x then from this form I open my modal form "frmZlecenia" and then I will click "menu" button - now form "x" is open :/, but should be "frmZleceniaMarzenaNawigacjaPD"
There is some way to open concrete form from modal form?
So I have a function (TradeRoof_AfterUpdate) inside my form (frmCustomers) that calls one of 2 functions (ActivateConditions or DeactivateConditions) in a module (modRender). ActivateConditions is then supposed to call on one of 2 functions, Activate or Deactivate, also inside modRender. None of these functions are supposed to return a value, just change visibility of a control and true to false or vice versa.
i don't know why, but for some reason, i can't pass a control from ActivateConditions to Activate or Deactivate. Here are the functions (DeactivateConditions and Deactivate are nearly identical to their counterparts): Code: Public Sub ActivateConditions(Sticker1 As Control, Condition1 As Control, Optional Condition2 As Control, _Optional Condition3 As Control, Optional Condition4 As Control, Optional Sticker2 As Control) Sticker1.Visible = TrueIf Not IsMissing(Sticker2) ThenSticker2.Visible = TrueEnd IfIf IsMissing(Condition2) ThenActivate Condition1ElseIf IsMissing(Condition3) ThenActivate Condition1Activate Condition2ElseIf IsMissing(Condition4) ThenActivate Condition1Activate Condition2Activate Condition3ElseActivate Condition1Activate Condition2Activate Condition3Activate Condition4End IfEnd Sub
Code: Private Sub Activate(ActiveCondition As Control) ActiveCondition.Visible = TrueActiveCondition = FalseEnd Sub
when i hit the trigger on my form, i get this error: "Run-time error '91': Object variable or With block variable not set," and then it highlights "ActiveCondition.Visible = True" in my Activate function.
Why can't I perform this action? Any help is greatly appreciated!
(1)Let's say I have numeric fields A and B.I want, whether with a query or with an Acess functionality if such exists,to show the user a C field which shows the sum: "A+B" of each registry. (Not the totals, I mean a new field).
(2)This is something i need to know. There is something else. Let's say i want, from the past example, the same table A,B and C. Let's say theres another field called "FORMULA". I want now Access to use that formula, user inputed, apply it to A and B and show the result in C. But the user must define what calculations must be done.
Good afternoon, I have a form with a subform and in the first txtbox of the subform in the GotFocus event I have a little procedure which checks the txtboxs on the parent to make sure that there is data in all four of the txtboxes. This works great the first time and it pops up a msgbox and it even setsfocus on the txtbox with no data in it, but if I tab into the subform a second time and there still is no data in one of the txtboxs on the parent form, nothing happens, no message and no setting focus on the txtbox with no data in it. Does anyone know of a way to get this procedure to re-set everytime a user tries to enter the subform? Thank you in advance to anyone offering and ideas and suggestions.
Okay, seems like it should be simple... maybe I'm wrong though:
Any one know how to do real-time counting of the number of characters in a text box so that once it reaches 3 it automatically moves to the next text box? (Doing a phone number ... area code (int) and phone (long) to make for a total of 6 bytes.)
I've tried several versions of code for the on-change event but I can't seem to find the right way to assess the number of characters currently in the control... I'm pensive about setting an invisible control to just 'count up' because the on-change event would stack it even with a deletion. See most recent attempt below...
Obrigado, ~Chad
Private Sub txtAreaPhone_Change() Dim bytCount As Byte Dim strAPhone As String
If IsNull(Me.txtAreaPhone) = False Then strAPhone = Cstring(Trim(Abs(Me.txtAreaPhone))) bytCount = Len(strAPhone) If bytCount = 3 Then Me.txtPhone.SetFocus Else End If Else
SELECT fldtotal2003fiscal FROM tblTotals2003Archived
Unfortunately, I am querying somebody elses tables. They archive the data yearly into a new table to control bloat. Instead of yearly having to create a new query for the new year, I was wanting to just have a form that had a list box of years. Then the user can just select what year they wish to query, and the query is automatically updating the field, table, where condition, etc.
I do not know if this is available in Access as it is in Oracle / Coldfusion. Thanks for any help though.
ok , i have a primary table that have a field of "job", then i create another table that have a field of "job" too , then how can i do this task?
Whatever i type a data into the primary table("Job" field) i want it to duplicate the data into the another table("Job" field) . is it possible to do this? can anyone guild me to do ?
First off I have to say I'm not an Access Guru by any means. I can make a very very basic database in access but beyond that I'm toast.
So I've just started working on a project that is in it's second year. The project was started last year by a student and she created, what seems to me, to be an adequate small database for the project. I've noticed however that when entering data, some of it has to be entered twice. This has been made easier through the use of the look up tab in the field definition (?). However, I worked with a student before who created a database where the primary key value of a "parent?" table was automatically forwarded to the corresponding field in the "child?" table.
So here's a hypothetical, let's say you have a restaurant, and one restaurant can have ummmm many tables, and then one table can have manyyyy chairs! There's a unique restaurant id created in the restaurant table, which is say needed with a table number to create a unique table id in the table table, which is in turn needed with a chair number to create a unique chair id in the chair table? So you basically have 3 tables where unique ids are being created. So then lets say you have a chair description table that has fields in it to contain all the ids made previously, as well as some of the information entered to create the unique fields (i.e. table number, chair number). My question is..if I've already entered this data in previous parent tables then why is it that the data doesn't carry forward to these fields? Is it because these fields are not primary key fields in this last table? If that's the case then is there a way to set this up? Right now there's a select statement used in the look up reference option that has something to the effect "select table.table_name from table;". So I know what it's doing and when I enter data I can select the table id I need. It just seems a bit redundant data entry wise to enter yet again values I entered the table before, or values that were generated for me in the table before.
Is there a way to have these fields automatically populate with the corresponding data that was entered to get to this table? Does it involve modifying the select statement to involve a where clause (terminology? clause?). Any ideas would be very much appreciated! Thanks.
My database contains a table that has two fields named 'occurance1' and 'occurance2', both containing a range of different dates. In a form I have in that database, I would like to have a field displaying the total counts for both 'occurance1' and 'occurance2', but only the count for both occurances that have 'Today' as a date. Preferably without having to run yet another query, so if possible I would like that as soon as an occurance that has 'today' as a date is entered in the table, the total count shows correctly in the form.
Given the firmname and textbox name is it possible to programmically get the fieldname and table name where the data for that control is held.
I can use .controlsource and .recordsource
But is possible that .controlsouce is an alias of the actual fieldname.
Similarly the recordsource could be a query, from that I want to get the actual table, complicated say if two tables in the query had a field with the same name (even if only one was referenced)
I need to create a table with names of controls on my forms.
I'll use that table to apply user rules.
Any solution to write the table automatically using VBA code ?
I know how to populate a combobox...
DoCmd.OpenForm YourFormName, acNormal, , , , acHidden Dim c As Control For Each c In YourFormName.Controls [Control-Name].RowSource = [Control-Name].RowSource & c.Name & ";" Next c
I've been developing an Access database to keep track of my company's ongoing projects. There's also a form to browse the history of users actions within the program. It's based on table tbHistory that stores actions and parameters as numbers (for example eventId = 1 is "logged in" and eventId = 2 is "logged out"). I've been using a query to translate those numbers to text with a syntax like:
Code: IIf([tbEvents].[EventId]=1 Or [tbEvents].[EventId]=2;[tbEvents].[EventDesc];IIf([tbEvents].[EventId]=5 Or [tbEvents].[EventId]=6;...
It worked fine but eventually the expression within expression builder has grown to the level that exceeded allowed limit and I couldn't develop my statement any more.. I decided to develop a vba function that would take eventId as a parameter and would retrieve a string, here it is:
Code: Public Function translateHistory(eventId As Long) As String Select Case eventId Case 1 To 2 translateHistory = ""[tbEvents].[EventDesc]"" Case 6 translateHistory = "[tbEvents].[EventDesc] & "" <b>"" & [tbFormDesc].[FormName] & ""</b>"""
[Code] ....
And in my query I replaced that extremely long expression with just translateHistory([tbHistory].[eventId]). It seems to work, but the result it brings is a pure string with table names and fields - in other words, the query doesn't recognize it should be replaced with appropriate value. Here's the output I get:
Of course I'd like "[tbEvents].[EventDesc]" to be replaced with appropriate value of field "EventDesc" from table "tbEvents" as it used to be.
I want update a table (in Access 2010) based on the results from a pass-through query that pulls data from an old Fox Pro database.
With the following query I push data into my access table (everything works fine):
Code:
INSERT INTO Bolle ( esercizio, numero_documento, ...) SELECT Bolle_Arca.[esercizio], Bolle_Arca.[numero_documento], Bolle_Arca.[testata_codice], ... FROM Bolle_Arca WHERE Bolle_Arca.[testata_codice] NOT IN (SELECT Bolle.testata_codice FROM Bolle)
When I try to update the same table using the same pass-through query:
Code: UPDATE Bolle INNER JOIN Bolle_Arca ON Bolle.riga_codice = Bolle_Arca.riga_codice SET Bolle.esercizio = Bolle_Arca.esercizio , Bolle.numero_documento = Bolle_Arca.numero_documento, ... WHERE Bolle.spedito = False and Bolle.data_invio_mail_spedito is null and (Bolle.tracking is null or Bolle.tracking = '') and Bolle.testata_codice = Bolle_Arca.testata_codice;
I get this error: "Operation must use an updatable query"
I have a linked table in ms access and it has a column as details. in ms access when i click on this button i will go to another form. i want to assign a picture (for opening a form) to this column but i don't know how i have to do this. my form opens as a datasheet view.
I am mid way through a Access db and have a solid idea what i want from a form. The idea is for a rota display and edit form.
a tab control with 5 tabs (-2 weeks, -1 week, current week, + 1 week, + 2 weeks) and when the user clicks it lists all the employees (Employee Table) with any found rota entrys (Rota Table) populating into a text box type table with employees information blank where no rota information has been entered.
then the user can edit / add shift information from that table and hit save.
the main rota information is inputted by an excel import but this is done once a month and adhoc changes will be needed (holidays absence etc)
the only thing i found like what i want is a continuous form (which ive never used before but been told that wont go in a tab control)
How i would accomplish this (code snippets - doesnt have to be detailed just the fundamental functions so i can add modify to suit the information the sql's i already have its just the form controls.)
I am wanting to populate a control in a form based off of two different fields in one table. Is that possible?I have a table called tblEmployeeMaster and it has a LastName column and a FirstName column in which I need to have both first and last name show up in one box on my form?
So I have 2 forms, an Edit Lot Form, and an Add Run Form. Each lot will contain several runs. What I want to do is be able to add a run associated with the specific lot by pressing a button "Add Run" in the lower right corner of the edit lot form (see attached images). So the information for the lot will carry over to the run form and autofill the fields pertaining to the Lot in that form.
I have a form, frmSub, that contains the combo box comProducts. I also have two tables, Products and PurchaseDetail. Both tables have the field ProductID.
I want comProducts to create a new record in the Products table, using the input in a field called Product and then to use the value of ProductID to create a new record in the PurchaseDetail table. Ie, so the PurchaseDetail table has a record that links to another record in the Products table via the feild ProductID.
So what I have created is a form with 4 combo boxes which filters a subform with a click button by running a sql query.It was working great yesterday but then when I made the subform a pass through query it seems to no longer run (or just runs so slow it takes a large amount of time to query). To get a better sense of what I'm talking about I basically have a button and inside of the button it takes this query template:
SQL = "SELECT * FROM queryname WHERE 1=1"
concats with if statements to the end of the Where clause with the values in the combo box and then sets
subFormName.Form.RecordSource = SQL
how I can get this table to query...Also, for my second question, is it possible to make this pass through table editable after I filter it?
I use the following code to delete from a table all records except those meeting the WHERE criteria:
Code: DELETE tblABC.*, tblABC.SubjectID FROM tblABC WHERE (((tblABC.SubjectID)<>99 And (tblABC.SubjectID)<>432));
I'd like to run this exact same query, but on many other tables, all of which are stored in tblTablesToClean (TableID, TableName).
Any good way to have Access loop through the list of tables in tblTablesToClean, each time passing the name of the table into the DELETE code and running the code, until all tables have been processed?
I have code that will create an email and prepare it for sending.It will create a table inside the email and fill it in with some text and underscore characters to be replaced by data from the database. So far the data has to be done manually. I would like to know if it is possible to use the values from some fields inside the select record in the current form. So, if Me.Status would be "New" it should pass this to the table in the email.So far I have the below code:
Code: Private Sub Command280_Click() 'send email with table Dim objItem As Object Dim oMail As Outlook.MailItem Set oMail = objItem Dim oApp As Object
