Recent content by glasgowlad1999

  1. G

    Is there a better way to write this?

    *AuditWorkSheet' Was returned
  2. G

    Is there a better way to write this?

    is there a way to add a trim to the code as it looks like the SQL db is adding spaces DoCmd.RunMacro var, , ""
  3. G

    Is there a better way to write this?

    Under Macros I have AuditWorkSheet In the table I have AuditWorkSheet not "AuditWorkSheet" or "AuditWorkSheet' or 'AuditWorkSheet'
  4. G

    Is there a better way to write this?

    The line that causes the error is: DoCmd.RunMacro var, , "" var = "AuditWorkSheet' I typed how it was displayed Markk I will try the other way once I get my head around this way. However I am very new to VBA and I am now changing my macros to VBA.
  5. G

    Is there a better way to write this?

    Using this code I get a run-time error 2485 MS Access cannon find the object 'AuditWorkSheet Inside openexcelParameter i have the macro name AuditWorkSheet Private Sub LindasWS_Click() Dim var var = DLookup("openexcelParameter", "dbo_tblUser", "UserName = '" & Forms!AIR_DetailsB.UserName &...
  6. G

    Is there a better way to write this?

    This code takes the data and puts in a temp table DoCmd.OpenQuery "tblProcedureAppend", acViewNormal, acEdit DoCmd.OpenQuery "tblDiagnosisAppend", acViewNormal, acEdit DoCmd.OpenQuery "LDISTINCTCDC", acViewNormal, acEdit DoCmd.OpenQuery "LDISTINCTDC", acViewNormal, acEdit This...
  7. G

    Is there a better way to write this?

    Only difference between Tammy and Donna is the url location of their folder in the directory.
  8. G

    Is there a better way to write this?

    markk is openexcelParameter where i store DoCmd.RunMacro "openexcelDonna", , ""
  9. G

    Is there a better way to write this?

    I dont see a flaw and I am getting the last message, it just doesn't export.
  10. G

    Is there a better way to write this?

    I have 10 users and each have their own location to export the file too. So each if will run the Marco that holds their location.
  11. G

    Is there a better way to write this?

    This code gets the data ready in temp tables to export DoCmd.OpenQuery "tblProcedureAppend", acViewNormal, acEdit DoCmd.OpenQuery "tblDiagnosisAppend", acViewNormal, acEdit DoCmd.OpenQuery "LDISTINCTCDC", acViewNormal, acEdit DoCmd.OpenQuery "LDISTINCTDC", acViewNormal, acEdit...
  12. G

    Is there a better way to write this?

    Is there a better way to write this, this is what I get when I convert from macro to vb in access 2010. It runs but doesnt export the files. Private Sub LindasWS_Click() On Error GoTo LindasWS_Err DoCmd.SetWarnings False DoCmd.OpenQuery "tblProcedureAppend", acViewNormal, acEdit...
  13. G

    Looping error on last row of table :banghead:

    Wish I could find the same great help with an excel issue I am having, that I posted to excelforum...
  14. G

    Looping error on last row of table :banghead:

    Thank you Moving the update to inside the loop fixed the issue Loop ' Remove leading comma and space from concatenated string ' and update temporary table with the string strDiag = Mid(strDiag, 2) rstTemp![Charge_Amount] = strDiag rstDiag.Close...
  15. G

    Looping error on last row of table :banghead:

    vbaInet How do you do that? I am really new and managed to make different scripts work to get this far.
Back
Top Bottom