I have docmd.sendobject that opens Outlook to send an email, etc. However if the user does not send the email and cancels out of the message Access is asking the user if they want to debug. How can I simply have Access return to where the user was before they hit the command button that launched Outlook. I don't want them to go into the code. In fact I don't even want a message of any type - I thought I could trap the cancel somehow and code for it...
i dont want a user to be able to change a value in a combo box if a textbox is not null. im not sure what to add on the onenter event. is there not somthing like cancel=true
Is there a way to cancel a form's close event? If a user clicks the form's close button, I want a msgbox to ask if they are sure, and if yes continue and close, else cancel the forms close event. I know how to perform the msgbox and the if statement. I can not figure out how to cancel the form's close event.
I have an app that is browsing a survey. When the survey is in simple 'browse' mode, I want to be able to emulate the effect of a SkipResponse. (A SkipResponse is when selecting a particular value causes the normally sequential processing of survey questions to become non-linear. A sort of If Response = thisvalue then next question is something else) I can 'request' the SkipResponse by using Ctrl/Alt click, and then emulate returning from the target question by using Ctrl/Shift Click.
My problem is that I want to do the same thing (for a return) by allowing Ctrl/Shift on the Exit button. If I just use a regular mouseup evvent, it will complete, but will then go ahead and run the code for the Click event, to exit the survey. What I would like is to be able to cancel the processing of the Click event from within the handler of the MouseUp event.
I am trying to use a Combobox BeforeUpdate Event to achieve a required result.
I have two combo boxes inside a frame. The first is a year number 2011, 2012, 2013, 2014
The Second is the Week No ranging from 1-52, but 1-53 in some cases and this updates accordingly with the year number selected.
When the user has selected Week 53 and then changes the year to a year where only 52 weeks exist I want to Cancel their event.
I have already made a function to determine if 53 weeks exits however when I come to do the Cancel Event, the combobox for the year doesn't change back. It stays on the users new selection.
Below is the code that I am trying to use:
Private Sub cmbWeekNoFromYear_BeforeUpdate(Cancel As Integer) If UpdateWeekNoSelections Then Cancel = True Me.cmbWeekNoFromYear.Undo End If End Sub
'cmbWeekNoFromYear is the name of the combobox which holds the year number 'UpdateWeekNoSelections Simply returns True if I want the users change cancelled for cmbWeekNoFromYear
I have a form with a control for the user to enter some data and then two command buttons 'OK' and 'Cancel'
For the OnExit event in the control I have a procedure that check the user input and if incorrect, opens a message box with an error message asking the user to correct the data. It then cancels the event so the focus remains in the current control.
However if the user presses the 'Cancel' command button on the form to cancel & close the form, the OnExit event for the current control still fires and asks the user to correct the data.
In my code in the control, how can I recognise that the Cancel command button has been pressed, so I can cancel the OnExit event and close the form?
I have a form (Pipeline) with an on load event that automatically directs the user to a new empty record.
Code:
Private Sub Form_Load() DoCmd.GoToRecord , , acNewRec End Sub
Now my problem is that I am trying to design a 'search form' that will allow the user to look up a specific record in the main form by pressing a command button. Creating the search form is easy enough. I cannot figure out how to override the on load event in the main form when pressing the command button.
As it is right now, the button opens the form and then go directly to a new record.
I have a form and a subform in it. I added New cancel button in the form so that the the user can cancel the record creation and no record will be inserted in the parent table.
But when details are entered in the subform (a datasheet) row records will be created in the subform table. what is the correct method or how to cancel these records if the user choose to click cancel button on the parent form.
I will try to explain what I have, but for a little more information please see the thread where I was trying to get a single instance of this query to run: http://www.access-programmers.co.uk/forums/showthread.php?t=146582
This above thread was to allow users to select a valid month from a "quota" table of data to compile work data for that particular month. The way this all works is I delete a history table, append the data from my work table, and then add the data from a quota table. Each time a user runs this report, those three queries run dependant on the month selected. At the bottom of this report I sum up the columns to give an overall total for production numbers. The table is set up as: For MMM YY (selected) Item........Repaired......Quota widget1........1...............3 widget2........2...............0 widget3........6...............4 widget4........2...............2
Now what I need to be able to do is to retrieve all these totals at once; so that the numbers can be graphed by month. This history table that is built is not perminantly stored; since all the 'data' for it is contained throughout a couple other tables. I didn't see a reason to need to store 'all' that data again since it could be retrieved as needed.
Is it possible to write a query that will run this process for all distinct dates in the quota table and sum the data for repairs and quotas? Something like this:
I want to put a value from a field in a table in the Title Bar.
So far i have done (Looking at 2 ways to create, 1 with module below or directly in the form, only just lloking at the module way so is not finished as i am waiting to get it to work directly first):
Module Option Compare Database
Function ChangeTitle() Dim dbs As DAO.Database Dim prp As DAO.Property Const conPropNotFoundError = 3270
On Error GoTo ErrorHandler ' Return Database variable pointing to current database. Set dbs = CurrentDb ' Change title bar. dbs.Properties!AppTitle = "DYSMS " & (SoftwareVersion.tblSoftwareInformation) ' Update title bar on screen. Application.RefreshTitleBar Exit Function
ErrorHandler: If Err.Number = conPropNotFoundError Then Set prp = dbs.CreateProperty("AppTitle", dbText, _ SoftwareVersion.tblSoftwareInformation) dbs.Properties.Append prp Else MsgBox "Error: " & Err.Number & vbCrLf & Err.Description End If Resume Next End Function
Directly
Does not work Dim stAppTitle As String stAppTitle = "DYSMS " & (SoftwareVersion.tblSoftwareInformation) Me.Caption = stAppTitle
Does work Dim stAppTitle As String stAppTitle = "DYSMS " & (Now()) Me.Caption = stAppTitle
So need to declare the SoftwareVersion field i guess??
In my form I have the title of a CD which is under the name of 'CD_Title' which is taken from my CD's table and I was wondering how to show it up in a Label so when I flick through the albums the Label changes to the album that it is selected!
For Access 2003 - is there a way to stack one word on top of another when you rename a column? So, instead of having two words side by side for a column title, is there a way to put one on top of the other?
For example - change from this "today's date" to "today's date"
This should hopefully be an easy one for somebody:
How can I not display the title of any opened form at the very top of the screen. I would prefer to have the switchboard title remaining visible instead of the form title.
For example I have a form called 'frmPC' so the top of the screen shows 'frmPC : Form' when the form is open.
i have a form, and i would like that on one of the fields, as soon as i type something in it when i leave the field, i want it to automatically convert it to title case. can this be done please?
I have an *.mdb file with a bunch of tables, queries, forms, macro's etc. The file is named "xxx" but the display in the top left hand corner of the access window (next to the red key) is "yyy". I've looked everywhere and can't seem to find where this information is stored - as I need to change the "yyy" to match the filename "xxx" (the *.mdb was originally used for something else). Anyone know where this info is stored or how to change it?
This is the table: ID | Item | 2/2/07 | 3/2/07 | 5/3/07 | 7/3/07 --------------------------------------------------------- 101Tap10152010 102Ply25201010
Note that 2/2/07 till 7/3/07 are field names having purchase quantity.
I have a cross_tab query, that users print on a monthly basis.
The user selects whether they want to include data for one or all of three products. So the query could show data for example for Salmon only.
I need to be able to show on the printed query, what products it is displaying for. At the moment the query is called "TotalxProccessor_Product". Once the query is printed there is no way to tell if it is for Mussels, Salmon, Oysters or all three products.
Is there an easy way to manipulate the title the query prints our with?
Or do I have to go through a report to have control?
Does anyone know how to put in a file reference number automatically into the subject bar of an email?
This is the code that i am currently using:
On Error GoTo Err_Handler MsgBox "THIS FEATURE WILL ONLY EXPORT FILES WITH TODAYS REFDATE" If [CboExport] = "Today" Then Dim rst As Recordset Dim db As Database Set db = CurrentDb 'Create Recordset Set rst = db.OpenRecordset("SELECT tblAT.FileNr, tblAT.RefDate " & _ "FROM tblAT " & _ "WHERE (((tblAT.RefDate)=Date()));", dbOpenDynaset) 'Check to see if there has been records recorded today If rst.EOF = True And rst.BOF = True Then Beep MsgBox "THERE ARE NO RECORDS WITH TODAYS DATE, REFER TO SPECIFIC DATE." rst.Close Set db = Nothing Exit Sub End If 'Export query as MS EXCELL
DoCmd.SendObject acSendQuery, "qryTodaysDate", acFormatXLS, company@somewhere.com, myboss@somewhere.com, , "File reference number ?????????"The following file is the latest extract from me as at " & Date & "."
I'm using Access 2010. After creating a new database the standard screen appears that contains a grid to enter data and across the top of that grid is a row which is supposed to contain column titles. According to Microsoft Access all I have to do is double-click the column title so that I can set it to whatever text I want. the cursor remains in the next row assuming I want to enter some data. Why can't I change column titles from their default values?
Any workaround so that I can place more characters than the 64 limited in a field header.
In essence, I need to export a text or CSV file from Access every day, and the row header for the first column (i.e, in cell A1 if opened in excel) needs to read:
I saw the solution to this on this forum a while back but no matter what I search under I cant seem to find it again!
Can someone remind me how to change the Title of the error message boxes I can change the error message - by changing the Err.Description - but how do you replace the 'Microsoft Office Access' with your own Title?
I need to import a .csv file into a table. The problem is the top title information is on the file, like below. I do not want to import report name, report date, include rows, number of rows, and the blank space. I need to start the import on the header row. This looks fine in excel of course, but when i need to import it into access, there is no need for it. How do i either strip that out during the import or skip it.
sample csv file:
---------------------------------------------------- Report name: xxxxxx Report date: xxx Include rows where..... Number of row: xxxx
date,firstname,lastname,dollar,address,text 10/4,john,smith,888,12 w st,, 10/4,jane,smith,7575,34 w st,,
Is it possible to fully flash (Clear) the MS Access application window title bar? I mean to let it appear fully empty without the "MS Access" and the Access logo, the key.
I made it but I wasnt able to remove the MS Access logo, the key from the title bar
