Search results

  1. ted.martin

    SAVE Back-End tables before a major data update

    I have an application where there are several month-end data updates and although the code works fine, I am generally apprehensive that if anything ever went wrong, then the data in the BE tables could partially update and it would be a major problem to unscramble the data. I have written this...
  2. ted.martin

    Application will not Quit after running Docmd Outputto

    Thanks; I tend to agree that Access complete its activity before the Excel sheet is opened. I have other Excel outputs but they are a simple Docmd.Outputto ... and these work fine. This problematic one is within compound IF statments and perhaps Access is not finalising these before the Output...
  3. ted.martin

    Application will not Quit after running Docmd Outputto

    SOLUTION FOUND - the code needs a DoEvents before the Docmd.Outputto line ... But WHY?
  4. ted.martin

    Create a recordset for multiple emails and send one email

    You can prevent to Security warning if you use the Outlook Object Library to create and send the eMail. Also take a look at Redemption from Dimastr.
  5. ted.martin

    Application will not Quit after running Docmd Outputto

    Here are the facts: I am using docmd.outputto to output a table in Excel. I have been asked to have the Excel application Open after the output so have set the Autostart parameter to True. Everything works fine EXCEPT .... Later; when I have finished work (and by now the Excel file has been...
  6. ted.martin

    Error 1004 Copying Excel Workshtee from Access

    GOT IT with your HELP xlWS.Range(xl.Selection, xl.ActiveCell.SpecialCells(xlLastCell)).Select Just need to undersatnd more about Late Binding.
  7. ted.martin

    Error 1004 Copying Excel Workshtee from Access

    Sorry that errored as a 91 NOT 1004 = Object Variable not set; it did not like the 11. Again it works the first time but not the 2nd. 3rd is OK.
  8. ted.martin

    Error 1004 Copying Excel Workshtee from Access

    Hey that worked but then it 1004'd on xlWS.Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select Thats new but almost there. Can you give me the latebinding for this line too please.
  9. ted.martin

    Error 1004 Copying Excel Workshtee from Access

    I am outputting from Query and then have Excel Object code to copy the Excel worksheet and creating sub-totals. I am aware that the 1004 can occur during this process; there is lots of inromation but it the solution I am after. The code runs properly every alternate time (again this is on...
  10. ted.martin

    Return To Previous Current Record After Requery

    I don't think your code will work. The code I provided is straightforward and you will take a big step forward in your access programming if you can work out what it is doing. Good luck.
  11. ted.martin

    Make smaller tables out of a bigger one

    Should be easy enough using 3 Append Queries; one for each Down? and then Append the values to your New table field.
  12. ted.martin

    Split Database Got me Boatload if Issues

    Not sure if this is relevant BUT do you have more than one BE connected to your FE. If you do, then when linking the tables, make sure you select the tables for one BE at a time. If you select them all at once, it gets confused and will try to link them one at a time.
  13. ted.martin

    Form that creates a new record in a different table

    How about something like this? Using the On Enter event; assign the text box value to a Variable e.g. strEnter On the After UpDate event; assign the textbox value to a Variable strUpdate. Then using a simple IF statement, compare the value of the strEnter and strUpdate. If they are the same...
  14. ted.martin

    Return To Previous Current Record After Requery

    Here is a better way: Dim strBookmark as String Private Sub Form_Load() strBookmark = "" ' Reset this variable to Empty - precautionary End Sub Private Sub Form_Current() If strBookmark <> "" then Dim rs as DAO.Recordset Set rs = Me.RecordsetClone rs.FindFirst "YourControl = '" &...
  15. ted.martin

    Navigation Forms

    Sounds like you need to use the Tab Control Change Event For example Dim I as Integer I = Me.TabCtl If I = Me!TabCtl.Pages("TabName").PageIndex = TRUE then Do something etc.
  16. ted.martin

    Minimizing Empty lines on a report

    Not enough information provided but I would suggest that rather than having this code on the Load event; try it on the Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) event. ALSO the Property for Me.Label33.Value should be me.Label33.caption Labels don't have Values.
  17. ted.martin

    Compare 2 Multi Valued Fields

    Take look at this; 3 queries should give you what you are looking for.
  18. ted.martin

    File Sharing Lock Count Exceeded

    Here is the Query in SQL form; it runs in seconds! UPDATE [Test Results] INNER JOIN [Test Specifications] ON ([Test Results].TestName = [Test Specifications].TestName) AND ([Test Results].RecipeID = [Test Specifications].RecipeID) SET [Test Results].SpecificationTestID = [Test...
  19. ted.martin

    File Sharing Lock Count Exceeded

    Thanks for a very comprehensive and informed response. I follow your thinking exactly and have learned from your comments. It is often too simplistic to just right a bit of code to update one table from another when the design structure changes. That is what I did without thinking of the...
Back
Top Bottom