Results 1 to 3 of 3
  1. #1
    DavidMcArthur is offline Novice
    Windows 7 64bit Access 2007
    Join Date
    Jun 2016
    Posts
    18

    Its suddently stopped working - help

    Hi everyone



    I have a database where I pull info from it to merge into a word document. Everything was going brilliant. Nothing new has been changed until all of a sudden I get an error code. Error 4248!!!!!

    Code:
    On Error GoTo MergeButton_Err
        Dim objWord As Word.Application
        'Start Microsoft Word 97.
        Set objWord = CreateObject("Word.Application")
        With objWord
            'Make the application visible.
            .Visible = True
            'Open the document.
            .Documents.Open ("\\Dashboard System Files\files\quote1.doc")
            'Move to each bookmark and insert text from the form.
            .ActiveDocument.Bookmarks("our_ref").Select
            .Selection.Text = (CStr(Forms!Tender_List_Datasheet_Popup!Ref_Number))
            .ActiveDocument.Bookmarks("name").Select
            .Selection.Text = (CStr(Forms!Tender_List_Datasheet_Popup!Name))
            .ActiveDocument.Bookmarks("company").Select
            .Selection.Text = (CStr(Forms!Tender_List_Datasheet_Popup!Company))
            .ActiveDocument.Bookmarks("project").Select
            .Selection.Text = (CStr(Forms!Tender_List_Datasheet_Popup!Project))
            .ActiveDocument.Bookmarks("our_ref_2").Select
            .Selection.Text = (CStr(Forms!Tender_List_Datasheet_Popup!Ref_Number))
            .ActiveDocument.Bookmarks("company_2").Select
            .Selection.Text = (CStr(Forms!Tender_List_Datasheet_Popup!Company))
            .ActiveDocument.Bookmarks("project_2").Select
            .Selection.Text = (CStr(Forms!Tender_List_Datasheet_Popup!Project))
            
    
        End With
    
    
        Exit Sub
    Can anyone point me in the right direction?

  2. #2
    isladogs's Avatar
    isladogs is offline MVP / VIP
    Windows 10 Access 2010 32bit
    Join Date
    Jan 2014
    Location
    Somerset, UK
    Posts
    5,954
    According to my records there is no Access error code 4248 (at least not in A2010).
    Please recheck the code and also provide the error description.

    When it occurs, press Ctrl+Break. This will highlight the code line causing the error. Tell us that as well.
    Colin, Access MVP, Website, email
    The more I learn, the more I know I don't know. When I don't know, I keep quiet!
    If I don't know that I don't know, I don't know whether to answer

  3. #3
    Missinglinq's Avatar
    Missinglinq is offline VIP
    Windows 7 64bit Access 2007
    Join Date
    May 2012
    Location
    Richmond (Virginia, not North Yorkshire!)
    Posts
    3,016
    That's a Word error code...not an Access one! If you plug 'error 4248' into a search engine you'll get a bunch of hits...most about opening Word from Excel or Access.

    Linq ;0)>
    The problem with making anything foolproof...is that fools are so darn ingenious!

    All posts/responses based on Access 2003/2007

Please reply to this thread with any new information or opinions.

Similar Threads

  1. WinHTTP GET stopped working
    By Timaxusa in forum Programming
    Replies: 8
    Last Post: 04-29-2018, 04:58 PM
  2. LinkMasterField stopped working
    By PeakH in forum Forms
    Replies: 1
    Last Post: 01-25-2017, 03:56 PM
  3. Subforms stopped working
    By Paul H in forum Forms
    Replies: 7
    Last Post: 06-17-2014, 09:50 AM
  4. Access has stopped working
    By mrkaye in forum Access
    Replies: 0
    Last Post: 05-22-2012, 04:09 PM
  5. Access has stopped working
    By phillb in forum Forms
    Replies: 9
    Last Post: 01-10-2012, 12:22 PM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
Other Forums: Microsoft Office Forums