I just wanted to understand the different way Access use to open a word file. Then the IT department can make sure all the users are set up to trust that digital signature and the code should run more reliably. when the word code arrive at the ActiveDocument instruction. I'm waiting with confidence a solution/workaround of this problem. have a peek at this web-site
What is the full code for the procedure with: If ActiveDocument.FormFields("text65").Result = "Inpatient" Then _ ActiveDocument.FormFields("Check3").CheckBox.Value = True Formatting tags added by mark007 Reply With Quote 04-05-2012,04:18 PM #6 fumei View Sub CopytoWord() 'Requires Tools > References > Microsoft Word 11.0 Object Library Dim wdApp As Word.Application Dim wdDoc As Word.Document Dim doc As String doc = "x:\msword\MyFile.doc" If Dir(doc) = "" but it has succesfully opened. The word which passes as field 64 to the form informs the checkboxes to be checked. https://support.microsoft.com/en-us/kb/813983
In order for macros to be able to run, the Trust Center settings have to be correct - and I mean more than just enabling macros to run. I would have tought that in the second one would it be false...] Edited by Lauro2 Thursday, August 16, 2012 10:08 PM Moved by Leo_GaoModerator Wednesday, August 22, 2012 2:42 AM It has something to do with the reference in VBA being Microsoft Word 14.0 Object Library (for the users who have Office 2010).
Thanks, Midani Reply With Quote 04-10-2012,10:17 AM #15 fumei View Profile View Forum Posts View Blog Entries View Articles VBAX Wizard Joined May 2004 Posts 6,713 Location That was just an It should be straightforward to add to the code to copy the correct range and run it from one button. Davem501 Word 0 12-01-2009 02:10 AM All times are GMT -7. Runtime Error 4248 Word 2013 After it executes this, it also disappears from view.
Share it with others Like this thread? Vba Error 4605 How to restrict InterpolatingFunction to a smaller domain? You may have to register before you can post: click the register link above to proceed. Code: Option Explicit
Const wdGoToLine = 3
Const wdGoToAbsolute = 1
Dim objWord As Object
Dim objSelection As Object
move it up the reference list). Run Time Error 4605 Word 2010 Jhun 07-10-2013, 12:51 PM Norie Re: RunTIme Error 4248 Jhun I can't see why that would stop you combining the subs. Here is a piece of the VBA code in the Excel worksheet. Thanks to someone for letting me read the rule but that has hit me that the pressure of my problem, I forgot for a while.
I should have read the rules again. https://groups.google.com/d/topic/microsoft.public.word.vba.customization/lbqcinSxo7o But in the other pc, it only opens the word doc but not the copying part. Runtime Error 4248 This Command Is Not Available Because No Document Is Open I'll keep trying! #13 02-21-2014, 02:27 PM macropod Windows 7 32bit Office 2010 32bit Administrator Join Date: Dec 2010 Location: Canberra, Australia Posts: 14,316 I doubt the Word Run Time Error 5941 The Requested Member Of The Collection Does Not Exist http://www.mrexcel.com/forum/excel-q...ml#post3516111 My bad for not following rules before posting.
If you could re-explain what you were saying to me because I am such a newbie. Check This Out Now the code is try to access something that isn't there. Best Regards, Vishwajit -------------------------------- MCTS, MCPD - SharePoint 2010Vishwajit Walke Tuesday, November 27, 2012 9:19 AM Reply | Quote Microsoft is conducting an online survey to understand your opinion of the The users that have Office 2010 installed on their computers are getting a Run Time Error 4248 when they attempt to create the Word document from the Word Template. Runtime Error 4248 Word 2010
one has the main item and I always include in copying. The time now is 08:46 PM. but the pasting part which is the second code gives us the run time error 4248 as if there is no open document. http://prcflow.com/time-error/how-to-fix-runtime-error.html Code: 'http://vbaexpress.com/forum/showthread.php?p=185718 Sub ExportFinalColumnToWord() Dim wdApp As Word.Application Dim myDoc As Word.Document Dim mywdRange As Word.Range Dim MyColumnA As Excel.Range Dim MyColumnB As Excel.Range Dim MyColumnC As Excel.Range Dim MyColumnD As
Dim wrdApp As Word.Application Set wrdApp = CreateObject("Word.Application") Application.ScreenUpdating = False With wrdApp .Documents.Add Template:="G:\ABP\ArchSpec\A-Operations\Group Templates\Quote Templates\MWLinearQuote.dotx" Any help would be very much appreciated. Runtime Error 4248 Word 2007 It greatly help on understanding the problem. :) After trial and error, the Run-time error '4248' occurs when Macro Settingsis set to "Enable all macros(not recommended; ..." in the Trust Center. To resolve: Open Word Click the Word Icon in the Ball in the upper left corner Click Word Options at the bottom of the window click Add-Ins in the left pane
Thanks, lauro Monday, August 20, 2012 8:52 PM Reply | Quote 0 Sign in to vote Hi lauro, Thanks for your clearly description on the issue and the sample you provided. So, even if the user did the double-click, it doesn't look like that to Word. You asked earlier: In your code what happens if text65 = Inpatient? Run Time Error 4605 Visual Basic Dave Share Share this post on Digg Del.icio.us Technorati Twitter Reply With Quote Feb 14th, 2014,10:47 AM #5 CIF New Member Join Date Nov 2011 Posts 6 Re: Run Time Error
I am not good in VB actually. Show 40 post(s) from this thread on one page Page 1 of 2 1 2 Last Jump to page: All times are GMT -4. Typically the ADD-IN was compatible with Word 2003 and the related software or add-in has not been updated since deploying Word 2007. have a peek here Lauro P.S.: I noticed that Application.UserControl is TRUE (in the two first cases; and False in the last) [strange!
Using Elemental Attunement to destroy a castle Produce Dürer's magic square Pulldown resistor value for an NPN transistor to switch a solid state relay Right inverse of f(x)= x² that is The Document is null since the word is already open. thanks very much for the reminder... 07-10-2013, 01:31 PM excelaverage Re: RunTIme Error 4248 Sir... Yoyo Jiang[MSFT] MSDN Community Support | Feedback to us Proposed as answer by Dummy yoyoModerator Monday, August 20, 2012 3:16 AM Unproposed as answer by Dummy yoyoModerator Monday, August 20, 2012
Put your cursor on it and press F1. PS: When posting code, please use the code tags (which I've now added to your post, plus re-formatting because all of it had been lost). Especially Option Explicit. How is the no of rows/columns to copy determined? 07-10-2013, 02:03 PM excelaverage 1 Attachment(s) Re: RunTIme Error 4248 I perfectly understand the upsetting part when cross posting. :) Norie, I
Clearly if you are getting that error SOMETHING is not right. When I open the word doc from a VBA function like the following: Set objWordApp = CreateObject("Word.Application") With objWordApp .Visible = False ' or False .Documents.Open strNameFile End With I have To start viewing messages, select the forum that you want to visit from the selection below. All rights reserved.
Also, when I set the VBA code in the template to Private Sub Document_Open() Debug.Print Now End Sub The word "with code.docx" opens without any error too. It gives the run time error 4248.