.doc opens in design mode

G

Guest

Hi,

Does anyone have a clue how I can get my document not to
open in design mode?

I've created a questionaire which has a few basic vb/html
objects (drop down menus, combos etc.), but every time I
open it, it opens in "design mode". This is quite annoying,
as I have to circulate it to people that will have never
seen anything like that, and might be a bit confused.

Let alone the danger of them remaining in design mode and
messing the file before returning it...

Thank you,

Nikos
 
S

Steve Hudson

G'day <[email protected]>,

the .hasdesignwindow of each vbcomponent in the vbproject needs to be
false.


Hi,

Does anyone have a clue how I can get my document not to
open in design mode?

I've created a questionaire which has a few basic vb/html
objects (drop down menus, combos etc.), but every time I
open it, it opens in "design mode". This is quite annoying,
as I have to circulate it to people that will have never
seen anything like that, and might be a bit confused.

Let alone the danger of them remaining in design mode and
messing the file before returning it...

Thank you,

Nikos

Steve Hudson

Word Heretic, Sydney, Australia
Tricky stuff with Word or words for you.
wordheretic.com

If answers r 2 terse, ask again or hassle an MVP,
at least they get recognition for it then.
Lengthy replies offlist require payment.
 
R

Richard Rönnbäck

I am trying to do what I thought shouldn't be that hard but I am now totally
lost.

I am trying to get the document title from a Microsoft Word X document (the
title you fill in via File>Properties>Summary>Title)

Since it not exposed to AppleScript I thought I could stitch it together
with VBA, but despite reading Microsoft step by step article

http://support.microsoft.com/default.aspx?scid=http://support.microsoft.com:
80/support/kb/ARTICLES/Q184/4/40.asp&NoWebContent=1

over and over again I still don't get it.

Since I want a value back I assume it must be a function, which is (and it
does seem to work as expected):

Function GetTitle(strWordTitle As String) As String
Dim dp As Object
Set dp = ActiveDocument.BuiltInDocumentProperties
strWordTitle = dp(wdPropertyTitle)
End Function


I have then, with endless variations, tried to call from, and get the value
back to, the AppleScript, but to no avail. It should be something like:

tell application "Microsoft Word"
tell document 1
do script "GetTitle()"
set myTitle to the result
end tell
end tell


Can anyone help me?

TIA

/ Richard
 
T

Tom Winter

Richard Rönnbäck said:
I am trying to do what I thought shouldn't be that hard but I am now totally
lost.

I am trying to get the document title from a Microsoft Word X document (the
title you fill in via File>Properties>Summary>Title)

Since it not exposed to AppleScript I thought I could stitch it together
with VBA, but despite reading Microsoft step by step article

http://support.microsoft.com/default.aspx?scid=http://support.microsoft.com:
80/support/kb/ARTICLES/Q184/4/40.asp&NoWebContent=1

over and over again I still don't get it.

Since I want a value back I assume it must be a function, which is (and it
does seem to work as expected):

Function GetTitle(strWordTitle As String) As String
Dim dp As Object
Set dp = ActiveDocument.BuiltInDocumentProperties
strWordTitle = dp(wdPropertyTitle)
End Function


I have then, with endless variations, tried to call from, and get the value
back to, the AppleScript, but to no avail. It should be something like:

tell application "Microsoft Word"
tell document 1
do script "GetTitle()"
set myTitle to the result
end tell
end tell


Can anyone help me?

TIA

/ Richard

You'll probably have more luck posting your question in one of the Mac
newsgroups, like microsoft.public.office.mac or microsoft.public.mac.office.

-Tom
 

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

Top