Recent content by themanof83

  1. T

    VBA Merging PDF's (Acrobat 9.0)

    Just realised that when using the 'Insert Pages' function within Acrobat it inserts the respective document into the open document and supplies a bookmark for the inserted PDF, however, that bookmark doesn't actually have any action behind it... worth knowing!! So the bookmarks I am renaming...
  2. T

    VBA Merging PDF's (Acrobat 9.0)

    Anything I can add to help you guys help me??!
  3. T

    VBA Merging PDF's (Acrobat 9.0)

    Hi all, I have created a function that I feel is worth sharing although it isn't quite doing what I expect. Here's what I have in my database: I have a long list of Tests each with an assoicated PDF file Each of these tests has a specific ident but can belong to a specific section i.e. 1a...
  4. T

    Return (Control) to Access....

    OpenPDFDocument is purely a function that: Gets the executable path for the file type association (.pdf) Checks the version of adobe reader/acrobat based on the information in this path Uses the Shell statement to open the file name passed to the function with the appropriate program Dependant...
  5. T

    Return (Control) to Access....

    Afternoon All! I have a function (activated through a Command Button) that opens up a PDF, copies the contents then tries to paste this into a field on the form. I am having trouble getting the function to return correctly to the open Access Application and hence the correct form field. Ive...
  6. T

    Message Box Response

    You are close.... try the following: Dim Msg, Response Msg = "Message details..." Response = MsgBox(Msg, vbExclamation + vbYesNoCancel, "Message Heading...") If Response = vbYes Then ' User chose Yes ElseIf Response = vbNo Then ' User chose No ElseIf Response =...
  7. T

    FileExists functions - Not capturing Error 52 correctly

    Ok, found two seperate FSO approaches that seemingly work for files and folders... Function FileExists(filespec As String) As Boolean FileExists = CreateObject("Scripting.FileSystemObject").FileExists(filespec) End Function Function FolderExists(filespec As String) As Boolean...
  8. T

    FileExists functions - Not capturing Error 52 correctly

    Morning All, I have been having issues with a number of functions trying to capture a 'Bad File Name' or 'File Does Not Exist' error (#52), before it occurs. I was wondering whether I am doing something fundamentally wrong as nobody else has seemingly struggled with this. There are a large...
  9. T

    Loop Troubles!!

    Appreciate the comments about subroutines, and this is something I inherently do once the thing is working.... However, I have found a fundimental flaw in the code itself so will continue churning away... doh!
  10. T

    Loop Troubles!!

    Ok, I'm again at my wits end... I really don't understand why the following code isn't looping through correctly. The code is to pull out a string (path) for each element in the variables array. Then for each element in the three arrays, write the string to the given file i.e. elements 0 first...
  11. T

    Openrecordset Query NOT Working!

    Leigh, I tried the DAO methods listed here but they didn't seem to do the job... I implimented the code from your original post that you linked to... which was ADO, was it not??? Personally not a huge VBA programmer so not involved with the ADO/DAO conflict ;)....
  12. T

    Openrecordset Query NOT Working!

    Thank you all so much, you are all heroes! I haven't used this forum in over a year but once again my questions are answered! Cheers guys, here's the final code: Private Sub CreateBatch_Click() 'This Subroutine outputs a number of batch files for the currently selected query 'in the default...
  13. T

    Openrecordset Query NOT Working!

    I appreciate that Bob thanks... Any chance you can explain the QueryDef route for me, something I'm not familiar with. Cheers.
  14. T

    Openrecordset Query NOT Working!

    Good questions Bob... Here's the full code: Private Sub CreateBatch_Click() 'This Subroutine outputs a number of batch files for the currently selected query 'in the default directory \\proj\test\autotest\batch Dim d As Control Dim FileOpen As Boolean Dim MyFile As String Dim Section As...
  15. T

    Openrecordset Query NOT Working!

    Yes, there's debug code in the loop already and it is definately working when I use a table instead... stQuery is a well defined String ....
Back
Top Bottom