Search results

  1. A

    Want to close a form without saving dirty record

    DoCmd.RunCommand acCmdUndo Me.Undo
  2. A

    Help, Lotus Notes Send to Multiple only sending to first two listed

    Try separating them with ; instead of ,
  3. A

    Query Filter

    Where is this 'reference number'. Say this was on your Main Form, the other two Forms could be based on a Query that uses the Main Form Criteria. If not the quickest way is to just create two Queries and have separate criterias.
  4. A

    opens an excel file and copies values from access textboxes to excel cells

    Initially to open the Excel file Private Sub cmdOpenExcel_Click() Dim xlApp As Excel.Application Dim xlWB As Excel.Workbook Set xlApp = New Excel.Application With xlApp .Visible = True Set xlWB = .Workbooks.Open("C:\path\xlfilename.xls", , False) End...
  5. A

    Include PK in destination filename with CopyFile

    Thanks @StarGrabber, it was late and I was on my phone so I should have been more careful
  6. A

    Combo box populate table fields

    You could use a DLOOKUP http://599cd.com/tips/access/dlookup-function/?key=AlexForumAF =DLOOKUP (Field, Domain, Criteria) e.g. =DLOOKUP ("LastName", "CustomerT", "CustomerID=5") Or =DLOOKUP ("Address", "CustomerT", "CustomerID=" & CustomerCombo) Just set the source/default value of your...
  7. A

    Filter Problem

    Sub FilterTo2Fields() With Sheet1 .AutoFilterMode = False With .Range("A1:D1") .AutoFilter .AutoFilter Field:=1, Criteria1:="Dave" .AutoFilter Field:=4, Criteria1:="Lab" End With End...
  8. A

    Need to eliminate the blank cell in data range for chart

    Do you know the first cell of each range of data? You could set the range for the chart using VBA. Range("W6").CurrentRegion.Select
  9. A

    Include PK in destination filename with CopyFile

    Private Sub btnCopyFile_Click() Dim myFilePath 'original file Dim myFolder ' destination folder myFolder = "C:\Folder_B\" Set FSO = CreateObject("Scripting.FilesystemObject") dim fileName fileName.GetFileName(Me.txtOriginalFile) myFilePath = myFolder & Me.txtMyPK & "_" & fileName If...
  10. A

    opens an excel file and copies values from access textboxes to excel cells

    Are you wanting to create a new Excel file? Will this be the same existing file or do you wish to choose a different file each time. Will it always be the same cells in the Excel file?
  11. A

    Web Baesd Online Invoicing???

    Is there a reason why you can't just create an invoice template yourself and just email that to your customer? You could create a Report in Access then set up an email routine for that specific order. http://www.599cd.com/tips/access/130511-email-report/?key=AlexForumAF
  12. A

    Query Filter

    You could either set your Form to have a Record Source based on a Table and then have a list of records with a button to open the specified Record DoCmd.OpenForm "frmName", , , "ID=" & Forms!frmName2!IDControl Or use a parameter Query and base it on a value from the Form...
  13. A

    Help, Lotus Notes Send to Multiple only sending to first two listed

    Of the example which of the below we're sent? Did you have a loop that input each of these separately? Running all of the above code for each.
  14. A

    Unbound Object Frame Inside Tab Control

    You could place the code in the Form's OnLoad event instead of a button.
  15. A

    Current User

    You could create your own function and use =Environ("username") To get the currently logged in Windows user.
  16. A

    On Click event procedure skipping the On CLick code

    If you import the form into another blank new database does it act strangely there too?
  17. A

    Applying a filter

    You could create a Query instead. Save this and open that instead of your Table. It's best to work with Queries instead of Tables if you want do filters etc. Sometimes the filtering on a Table doesn't persist. Create a new Query, add your Filter, in the Ribbon in the Sort & Filter Section...
  18. A

    Button to export a form and view it in excel

    Is the name of your Table/Query "MHBTimeSO"? When that error appears and you press Debug, which line is highlighted in yellow in the vba window? As Alansidman suggested did you try: Call SendTQ2Excel("MHBTimeSO")
  19. A

    Button to export a form and view it in excel

    The function starts like Public Function SendTQ2Excel(MHBTimeSO As String, Optional HBTime As String) ... The values between the brackets ( ) are arguments: MHBTimeSO As String Optional HBTime As String The error messages is saying: Compile Error: Argument not optional message Because you...
  20. A

    roundup or down to the nearest half is it possible?

    Are you storing your values in a Field with the Data Type of Date/Time? You could use some time functions: let mytime be the Field name Example mytime = 02:07:30 Hour(mytime) = 2 Minute(mytime) = 7 second(mytime) = 30 Now since you are wanting to round on half hours we only need to change...
Back
Top Bottom