Search results

is there a VBA command to preview a report and open the print window? ... My current code is ... If Me.OrderType.Value = "Quotation" Then DoCmd.OpenReport "SalesQuotation", acPreview, , "OrderID = " & Me.OrderID End If > Pleasde note that ribbons and QAT are both hidded in my project...

I have made a video of my issue. I dont know why but after making changes in design view (Navigation plane>right click the report>Select Design View) the Filter is blank please see video... Before Editing... After Editing... Video... Is it an Access Bug? Can it be fixed? is there a better...

im havimng an issue where my Boss has asked be to do something left feild and i need to know how best to go about it. i have created a report that displays technical specifications for products for all product groups. Basically if a product group = Accesory, PartNo starts with "AC", then i need...

Searched and found a solution for this issue but for some reason its not working for me. Code im using... Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) Me.LblNotes.Height = Me.Notes.Height End Sub Results.... BTW the Text box "can grow" Any idea why the label isnt...

im having an issues on diplaying text when access wraps text, with numbering or bullets. The text is curretly set to rich text and this is the issue im having.... my report looks like this... Target text Alignment The safety requirements are based on the assumption that the dock...

Hi Chaps, i Hope you can help im running into problems with this code.... Private Sub OrderType_AfterUpdate() Dim TmpTxtHeading As String Dim NewTxtHeading As String Dim rst As Recordset Set rst = Me.FRmQ_OrderItemSUB.Form.Recordset Me.OrderMainText = Me.MainQtext Me.DocumentsInc =...

Hi i cant get a really simple peice VBA code to work Have tried, but with no success.. strSQL = "UPDATE TblOrderCustLink " & _ "SET QuotePrintdate = Date() " & _ "WHERE OrderCustLinkID = " & Me.QuoteOrderCustLink & ";" works well in a Query, SQL statement... [CODE]UPDATE...

Hi, i'm looking to print out some text "FooterTxt2" just before a page break on an access report which only needs to appear on one page, the 2nd page at the bottom. Above this text are 2 tables and a text box that need to grow and setting a top margin for the text has risk if the tables grow...

Hi I wonder if anyone can help.. i have this table... TblQuote QuoteID QuoteNo QuoteVer HideQuote 2107 2107 1 No 2109 2107 2 No 2111 2107 3 No when the user creates a new version i would like to know how to calculate and hide old records for a given QuoteNo (all...

Hi! I have taken a standard code for duplicating a form with its subform, but it falls over when trying to append the subform to its table.... Private Sub OrderCopy_Click() 'On Error GoTo Err_Handler 'Purpose: Duplicate the main form record and related records in the subform. Dim...

I have a form that opens a query. In the query, there is a filter... [Forms]![FrmNote]![AC_No] Target objective If in the form [AC_No] is null then show data for all CustomerID in the query however if [AC_No] is not null then it displays the query for a specific CustomerID that is defined in...

Guys, I have a table called Order one of the fields is called [InvoiceID]. I have a button in a form that auto-generates a sequential Invoice number, by looking up the highest value and +1. I did this via a macro... Set Value Item = [InvoiceID] Exp. = DMax("[InvoiceID]","Order")+1 But I...

Hello Guys, Bit of a newbie so apologies in advance I wish to match 3 results if all 3 are true pop up a single message box appears, using the Dlookup method. 'If DLookup("Retailer", "OnSite_CoverTrue", "Retailer='" & Me!PURCHASED_FROM & "'") = Me!PURCHASED_FROM Then ' MsgBox...

Hello chaps! Just registered!!!!! yipee :) Ive been messing around with access for a few years now but very much lacking in VBA but i am reasonably confident in access forms queries tables and macros. I define my self as a being self-taught, so i guess there is more that i could learn and of...