I am currently working on a main form in Access 2010 which includes quiet a lot of fields, therefore i choose to create parts of it (which are as well optional, as they do not apply to all records) as different forms which i linked to the "mother" form afterwards through a checkbox by using the following code:
Private Sub chkMajor2_Click()
Dim strformname As String
If Me.chkMajor2 = True Then
strformname = "Major 2"
DoCmd.OpenForm strformname, acNormal
End If
[code]....
to make the next form visible for selection after filling in the current one...something like an "add more.." field actually, which i choose to represent as checkbox.The issue that i encounter is that when i click the "Add New" button in the main form, it doesn't clear also the fields in the linked forms. Is it possible to do that with a VBA code? Or how should i proceed?
The current code that i have for the button is:
Private Sub cmdNew_Click()
DoCmd.GoToRecord , , acNewRec
End Sub
I have made a form with a subform to search for existing records based on inputting a postcode then selecting the relevant address from the subform which then fills the form with details of that chosen record ready to issue a further package linked to that original record.
To prevent errors and confusion by the users I coded the following:
Private Sub CmdFindAddress_Click() If IsNull(Me.TxtPostcode) Then MsgBox "You need a Postcode to use this button. Please type one in." Me.TxtPostcode.SetFocus
[Code] ....
'Where the postcode entered does not exist in records or if there is a mistake typing in the postcode, below will remove residual record details from previous postcode ready for a new postcode search:
For Each ctlCurr In Me.Controls If ctlCurr.Tag = "clear" Then ctlCurr = Null End If Next ctlCurr Me.Refresh End Sub .........
The problem is that if I test the system by inputting a postcode where I know there are no records, the CtlCurr is highlighted and the error message is:
Compile error: variable not defined ..........
This does not happen if I have already selected a postcode so the record fields are filled and then change the postcode - so the record fields are cleared.
Previously, entering a postcode which did not match existing records generated the "there are no records...." error message instead. How do I define CtlCurr?
I have a timesheet form that pulls from a query that pulls from a table I want to clear my daily charges and reset back to the default value of 0 when my form opens ...
Created a button through button wizard that is supposed to open a form to add a new record, but all of the fields don't clear out. Only some fields clear and other fields actually populate data from another record.
Snip1 shows my form with a record selected. When I click the 'New Waste' button, you can see that the record ID goes to '(New)', but the fields actually populate data from another record.
This even happens if I set 'Data Entry' to yes for the form.
here's the code behind my button:
Code: Private Sub btnNewWaste_Click() DoCmd.GoToRecord , , acNewRec End Sub
I even commented out my code for duplicating my record just in case but that didn't make a different.
Code:
Private Sub btnDuplicateRecord_Click() Dim ctrl As Control For Each ctrl In Me.Form.Controls If ctrl.Tag = "DefaultMe" Then ctrl.DefaultValue = """" & ctrl & """" End If
[Code]....
edit: this problem persists in a backup database that only contains one test record. The button pre-populates data that doesn't exist in the back-up database.
Hi everybody. I got a query that displays object name and object type of access 2000 db. Unfortuenly it dose not display the linked tables objects(linked to tables in acccess 2000 db). could an expert tell me how i can fix this query so it displays linked tables object as well.Thanks
SELECT MsysObjects.Name AS ObjectName, IIf([type]=1 Or [type]=6,"Table","Query") AS ObjectType FROM MsysObjects WHERE (((Left$([Name],1))<>"~") AND ((Left$([Name],4))<>"Msys") AND ((MsysObjects.Type)=1 Or (MsysObjects.Type)=5 Or (MsysObjects.Type)=6) AND ((MsysObjects.Flags)=2097152 Or (MsysObjects.Flags)=128 Or (MsysObjects.Flags)=0 Or (MsysObjects.Flags)=16)) ORDER BY MsysObjects.Name;
Hi everybody. I got a query that displays object name and object type of access 2000 db. Unfortuenly it dose not display the linked tables objects(linked to tables in acccess 2000 db). could an expert tell me how i can fix this query so it displays linked tables object as well.Thanks
Code:SELECT MsysObjects.Name AS ObjectName, IIf([type]=1 Or [type]=6,"Table","Query") AS ObjectTypeFROM MsysObjectsWHERE (((Left$([Name],1))<>"~") AND ((Left$([Name],4))<>"Msys") AND ((MsysObjects.Type)=1 Or (MsysObjects.Type)=5 Or (MsysObjects.Type)=6) AND ((MsysObjects.Flags)=2097152 Or (MsysObjects.Flags)=128 Or (MsysObjects.Flags)=0 Or (MsysObjects.Flags)=16))ORDER BY MsysObjects.Name;
I have two forms linked by a field "JUVIS". My problem is that I can't get the second form to show data newly entered on the first form without moving to another record on the first form. I have a command button on the first form that opens the second form. All works well, meaning the forms are synchronized,based on the JUVIS field, except in the case of entering new data. In this case the second form opens to a blank screen instead of showing the JUVIS field. The forms are both linked to tables not to queries. Any help would be appreciated
I have a form [Art_DepartmentFilter] that has a subform [Art_ByRoomSubform]. The linked master/child fields are DeptID and RoomID.
There is a list box on the form that allows you to select the department, and this also updates a list box that shows the rooms in that department that have art in them.
I would like the user to be able to filter the form to show either all of the art in that department, or just the art in the specific room. I have two separate buttons, one for each filter (cmdDeptFilter, and cmdRoomFilter).
I realized I had to add the link for the RoomID in order to get the filter for the room to work (which it does nowoCmd.ApplyFilter , "[qry_artbyroom]![DeptID]=[forms]![art_departmentfilter]![textdeptid] and [qry_artbyroom]![roomid]=[forms]![art_departmentfilter]![textroomid]").
However, DoCmd.ApplyFilter , "[qry_artbyroom]![DeptID]=[forms]![art_departmentfilter]![textdeptid] and [qry_artbyroom]![roomid] like '*'" returns just the first room listed for the department, not all of the rooms.
How can I show all of the rooms for the department selected?
I have form with an unbound combo box which is populated from a query
It should populate a field in a table which is related to another - however it only works when i query by id number (primary key) and not the text value i want - is it possible to query both so it returns say 1,option 1 - then when selected it will place a 1 in the table - which is related to option 1 in another table instead of just having to select '1' which will mean nothing to a user?
I have three questions, both im sure are easy just overlooking something.
1) I have a search form where you type the search parameters into 3 fields, and then your click search. I want the fields to automatically clear after the search button is clicked (but enough time for the query to get the info from the fields).
2) A combo box is used to select the marketing type, when first clicked.. a dialog box comes up and gives the user instructions for the next blank. After the field is changed to the right selection, i need it to automaticcaly forward to the next box.
3) I need to use a text box to sure information. The table records only 1 line of text, does that mean you cant have 2-3 lines? Really just 1 line wrapped in the window?
One of my tables has a couple of OLE Object fields. This has embedded Word, Excel, and PDFs. I'd like to know if there is a way to export these to a folder. Ideally, I'd like to save them with the record id and then a dash and then the file.
The fields are Attachment1, Attachment2, and Attachment3
When I view the table for these fields, if it's a word doc all I see is "Microsoft Word Document".
I am working on form where the user selects either "IN" or "OUT" from a dropdown of field name "CheckOut" in Frm1.
If they select "OUT" they will in turn need to fill in 2 additional fields. When they change the value back from "OUT" to "IN",
I want those other fields to be cleared of data for just this record so next time they change back to "OUT" from "IN" those 2 additional fields are already blank.
I currently have a small database where users input information on return parts. I have added a section to add data from testing and have made it so it greys out certain boxes when the part type is selected using conditional formatting. However conditional formatting will only allow either a data box (Text box) or the label attached to it to be formatted. I am unsure of how to grey out perhaps a rectangle I created when the part type is selected. I assume its coding which I am not the best at.
I am using my form to add job descriptions and if the user checks the check box for current, it adds the description to the table as the current job description. I need to clear the check box for the next entry but the box retains the choice so when the user selects another description, the form saves it as current even if the box shows no check in the box. I tried the code below, but that only changes the state of the box, but not the reality of the state of the box.
In VB you can index objects, and create duplicates of them, like this... Code:Load label1(1)label1(1).Caption = "This is a label" But to do it, you must first create the original object in Design view, and set it's Index property to a number (there is an Index field in the Properties window in VB). For examle, to do the above I would create a label called Label1(0) in design view.
However, I cannot find this Index Field in the Properties window in Access - can you even create arrays of objects?!?!
I am building a form where I would like to group fields into 3 groups, A, B & C. I know I could put all groups on their own subforms but I'd like to see if there is a way to simplify it all on one form since there aren't much fields for each group.
I would also like to hide each group when the user clicks 'hide group A' and shift Group B & C up. Then move them back to their original position when 'Display Group A' is clicked.
Same for each group. If Group B - Hide is clicked, Group C is moved up.
I've got each group tagged appropriately and I can hide/display them all properly by a For Each Control loop. Now, how to I move them all up/down a specific amount in addition to that? I would think it would be just as easy but my objects are moving by using the Grid Y property
I have a simple date stamp that works great in a private sub within a form. (error handling removed for clarity)
Code:
Private Sub btnDateStamp_Click() ' UserInit is global variable Me!Notes.SetFocus Me!Notes = Chr$(13) & Date & " - " & Time() & " - " & UserInit & _ " -" & vbCrLf & Me!Notes
[code]...
I am rewriting it as Module function that is Called from various forms, to save space. The function receives the parameters varFormName and varControlName. I wish to write the results of the function back to a memo field on the form.I am stumped at the get go by the need to refer to the Forms controls with a full reference instead of the Me command.
Code:
Function DateStamp(varFormName As String, varMemoName As String) 'varInitials, varFormName, varMemoName are global variables Forms!varFormName.Controls!varMemoName.SetFocus ' Error here 'Me!Notes = Chr$(13) & Date & " - " & Time() & " - " & varInitials & _
[code]...
how to refer to the forms control's with their full reference, from within the Module's function, the rest will fall into place.
I am building a simple form with a few Combo Boxes, text boxes and a picture. When two out of the three Combo boxes updates a few text boxes, labels but not all and the picture flikers/blink. I do have one other combo box that does not cause anything to flicker once it updates. This is getting annoying and it makes my form look unprofessional I do not have any vba or macros running yet on the form - I have tried different ways to creat the form IE. Form Wizard and Blank Design. I used the Look up wizard for creating the text boxes/ Combo boxes in the database.
The other thing I noticed is that when in design view the same objects blinks when I scroll up or down loger than the other objects.
I did search this site and the web but did not find anything that did not metion VBA code and the Echo on/off.
I have a database with a main menu which opens up on start-up it works fine and all but I want to go the extra step, I wish to disable / hide the ribbons (Top and Bottom) - Or Hide the whole Microsoft Access Window and display my form with the desktop behind it.
The next thing is once I click the X or the button to close the form I want Microsoft Access to appear again as in everything to show itself again.
I'm completely new to Access and would greatly appreciate your help in this problem.
I have a form name frmDataEntry with 10 fields, which enters data through an append query in Access. Firstly I was wondering whether I could do mutiple data entries, say 5 different entries of 10 fields each at the same time? Secondly, I wanted the form to clear all the entries after the user has submitted the data(I have made a submit button for this). I would greatly appreciate it if you could help me overcome these problems.
In that form I would like to have different check-boxes (three of them), representing actions done that day.
Let's say each form represents a contact, and I need check-boxes for:
- Called - E-mailed - Visited
This is something I am now able to do. But.... I would like these check-boxes to be cleared automatically the next day.
So when the database is opened the next day, these check-boxes start unchecked.
And I would also like that as soon I check a check-box on a certain day, there is an entry for that action and date is being entered in the record of that contact, so I am able to check later on what day, what action was performed.
Im doing an attendance in Access database , i have a Staff table and AttendanceMain table for keep all the staff attendance ...
I also created a query to append the data into AttendanceMain table ... the problem is , I always reuse the staff name , so i created a Staff form , but everytime i open the staff form the previous record still there , anyway to clear the "Tick Box" in staff table and without affecting the name ?(Name also is a record in row by row)
