Search results

I am running a query based on a form selection. If the form selection is a certain value, i want the query criteria to have multiple values: IIf([Forms]![FormName]![ComboName]="1",In ("1","2"),[Forms]![FormName]![ComboName]) This is throwing me a too complex to evaluate error. However if i...

SOS, that is certainly something i have considered. It does allow for a visually intuitive way of saying "no you can't enter a record here yet." Another idea would be to create an error in the on enter event of the subform. I do have some fall back ideas. I just wanted to see what other people...

You are right in that i can set the required property to no, however in most of these instances, referential integrity needs to be enforced. And i would hate for my users to enter values into several fields and then getting a before update error that tells them that their record will not be...

Sorry Khalid. Both of those ideas failed...

OK. Private Sub Form_Error(DataErr As Integer, Response As Integer) Select Case DataErr Case 3162 MsgBox "You have not yet selected a buyer for this order. Select a buyer before proceeding.", vbExclamation, "Error" Me.Undo Response =...

Hey, So i have come across a problem that i have found in some error trapping that i am doing this afternoon. When trying to enter data into a subform before the parent record is generated, Access throws you an error - no biggie, stock standard basic stuff. Replacing that error with something...

Try KeyAscii = Asc(UCase(Chr(KeyAscii))) ...in the on key press event of your control. You still might want to consider an afterupdate event for instances of copy/paste, which will make the above code redundant but you gotta cover all bases i guess...

Just thinking out loud, but maybe each part (Minutes, Seconds, Fraction) could be stored in a seperate field? Or maybe each time could be stored as a whole number? i.e. 5:23:79 = 32379 hundredths, then calculate backwards where necessary?

Your code worked fine for me (Internet Explorer 8 and MS Access 2007) Here's something else to try. It opens the default web browser and includes a check to ensure that the web address is in a valid format: Option Compare Database Option Explicit Private Const SW_SHOW As Long = 5...

If you want to just hide the table with your user data, you could rename that table with the prefix "Usys". Access automatically hides tables with that prefix. Or as trevor mentioned at the top you can hide the navigation window in the Access Options->Current Database settings. You may also...

I would like to throw in my 2C here and go back to the VBA mentioned at the top: Instead of declaring each form individually, why not create the code so that it can be used universally? e.g.: 'Callback for OnButtonPress Public Sub OnButtonPress(ctl As IRibbonControl) On Error GoTo...

It seems as though my perseverance has paid off: Do Until Right(Me.txtProduct_Temp_Req, 2) = "°C" Dim X As Integer X = Len(Me.txtProduct_Temp_Req) - 1 If Not IsNumeric(Right(Me.txtProduct_Temp_Req, 1)) Then Me.txtProduct_Temp_Req = Left(Me.txtProduct_Temp_Req, X) Else...

Hi, I have the following code: Dim X As Long X = Len(Me.txtProduct_Temp_Req) -1 If Not IsNumeric(Right(Me.txtProduct_Temp_Req, 1)) Then Me.txtProduct_Temp_Req = Left(Me.txtProduct_Temp_Req, X) Else Me.txtProduct_Temp_Req = Me.txtProduct_Temp_Req & "°C" End If I would like...

To expand on what ghudson said, here is an example of how you might export your report as a PDF: DoCmd.OutputTo acReport, "DD_UNAPPLIED_TAX-LOTS_REPORT", acFormatPDF, "\\NASDrive\share\clientfolder\TESTING\DD_UNAPPLIED_TAX-LOTS_REPORT.PDF", , , , acExportQualityPrint Hope that helps.

Alternatively you could download the MS Access Developer Extensions. Contained within that is their Package Solution wizard which includes the Access 2007 Runtime.

Try this: Dim objShell As Object Dim rpt_db As String Set objShell = CreateObject("Shell.Application") rpt_db = GetDBPath & "WarePro_RPT_prod.mdb" objShell.ShellExecute rpt_db, , , , 0 Tested Access 2007

In Access 2k7 VBA, you can set the output quality of a PDF: DoCmd.OutputTo acReport, [ReportName], acFormatPDF, [Output File Name],[AutoStart] ,[TemplateFile] ,[Encoding] , [OutputQuality] You have two options for OutputQuality: acExportQualityPrint acExportQualityScreen I have had the...

Gah! I even hunted through the object browser and couldn't find it... Thanks!

Hello, I have a form that has several buttons on it. Each button has its backstyle property set to transparent and its On Mouse Move event set to FontUnderline = true. For the sections' On Mouse Move Event, i want to set FontUnderline to false for each button. I can do this individually for...

Thanks vbaInet. The code that you added didn't actually work for me :). But the idea set me on the right path. I just added the same line of code for the On Enter event of subform 1 and now it does what it should. I also thought that it was to do with the current event firing before the...