Here's the Code in Full


Michael E Phillps

Scott and Ken

Thank you gentlemen close I think.
Set the breakpoints and tried to run the code. Here I will insert the whole
command button:

L1 Privat Sub Command102_Click()
L2 On Error Goto Err_Command102_Click

L3 Dim objWord As Object
L4 ' Open Microsoft Word using automation
L5 Set objWord = CreateObject ("Word.Application")

L6 objWord.Documents.Add "C:\Templates\"
L7 objWord.Visible = True

L8 Exit_Command102_Click:
L9 Exit Sub

L10 Err_Command102_Click:
L11 MsgBox Err.Description
L12 Resume Exit_Command102_Click

The L's are line markers.
Stepping through it goes as follows
L1, L2,L5, Then jumps to L11 then I get the error "ActiveX component can't
create object"

That's it, I hope I've been clear enough
Once again thanks guys, will wait and see what you think.


Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Open Form in Word 1
Array of Labels 4
2 questions. 4
Array to Multiple Arrays 3
SQL Query and Form 1
elseif formula 1
Nested IF functions 5
skipping blank lines - again 2