Internet Explorer automation in Word XP
I have a VBA application which loads and reads Web pages through
Internet Explorer. I last used it a couple of months ago with Word
2000 under Windows 2000, and it worked correctly. I am now running on
a Windows XP machine with Word XP, and it doesn't work.
I load Internet Explorer in a class module and use the
DocumentComplete event to make the application wait while a page is
being loaded. Here are the relevant parts of the code:
Private Const pageLoadTimeout As Single = 30 ' 30 second
timeout to load page.
Public WithEvents explorerObject As InternetExplorer
Private explorerWait As Boolean
' The DocumentComplete event routine.
Private Sub explorerObject_DocumentComplete(ByVal pDisp As Object, url
As Variant)
On Error Resume Next
If pDisp Is Nothing Then Exit Sub
If pDisp.Document Is Nothing Then Exit Sub
If Err.Number <> 0 Then
Err.Clear
On Error GoTo 0
Exit Sub
End If
On Error GoTo 0
explorerWait = False
End Sub
' Called after a page is loaded to wait until load is complete.
Private Function waitForDocumentComplete() As Boolean
Dim before As Single, after As Single
before = Timer
Do While explorerWait
after = Timer
If after < before Then before = before - 24 * 60 * 60 ' 'round
Midnight
If after - before > pageLoadTimeout Then
MsgBox "Browser timed out loading page " +
explorerObject.Document.url, vbOKOnly
waitForDocumentComplete = False
Exit Function
End If
DoEvents
If Me.explorerObject.Document.body.all.length > 0 Then
explorerWait = False
Loop
waitForDocumentComplete = True
End Function
' One of several functions that load a page, presented here as an
' example of how waitForDocumentComplete is used.
Public Function htmlGetBody(url As String) As HTMLBody
' Read the specified URL with the specified browser. Return the
' body.
explorerWait = True
explorerObject.navigate url
If waitForDocumentComplete Then
Set htmlGetBody = Me.explorerObject.Document.body
Else
Call cleanup
End
End If
End Function
I haven't figured out exactly what is going wrong, and I think the
problem is manifesting itself in several ways. One is that a reference
to the expression "Me.explorerObject.Document" generates an Automation
Error when a page is not yet loaded. Setting "On Error Resume Next"
doesn't prevent this, and I haven't found any way of detecting the
condition in code. Another manifestation is that the code sometimes
finds that Me.explorerObject.Document.body.all.length has a value
greater than 0 before loading is complete, and if the program
proceeds, any reference to a tag in the body will return Nothing.
I need to know what changes Microsoft made to this interface, and how
to accommodate them!
My mail address is jsachs177 at earthlink dot net. Tag: How to stop page counting when I merge files in to one Tag: 39651
Colour of Word XML elements
Is anyone able to tell me why the image used to mark XML
elements in Word changes from a grey fill to a purple fill?
The grey one has the name of the element in both the
opening and closing tags, while the purple has a shortened
closing tag containing no text.
It seems to be that when an element is first inserted into
a Word doc., it is in the 'grey mode', but as soon as you
type text immediately after the element, it goes
to 'purple mode' which doesn't allow carriage returns
within the element.
I'm sure there's a reason for this...?
Rob Tag: How to stop page counting when I merge files in to one Tag: 39650
how do a toggle in Word 6?
This macro in Word 97 toggles the blue screen off and on:
Sub BlueScreenToggle()
Options.BlueScreen = Not (Options.BlueScreen)
End Sub
What would be the equivalent code for Word 6?
Thanks,
Larry Tag: How to stop page counting when I merge files in to one Tag: 39649
How to save picuture in word 2000 document as .gif file
I want to save picture in word 2000 document as a separate
file.I don't want to save the whole document as html file.
Could anybody give me some help? Tag: How to stop page counting when I merge files in to one Tag: 39648
Word Error message help!!
Can someone PLEASE help me! Whenever I go on Word 2000 it
says, This Program performed an illegal operation and will
be shutdown. When I click on details it says: WINWORD
caused an invalid page fault in
module WINWORD.EXE at 0197:303e4fbd.
Registers:
EAX=00000034 CS=0197 EIP=303e4fbd EFLGS=00010206
EBX=038537c0 SS=019f ESP=0062e4ac EBP=0062e4cc
ECX=00ac3e90 DS=019f ESI=0062e4e8 FS=aea7
EDX=00000003 ES=019f EDI=0062e504 GS=0000
Bytes at CS:EIP:
8b 08 83 79 14 00 0f 85 f2 ae e4 ff 6a 00 50 e8
Stack dump:
00ab02e0 0062e4e8 00000002 0062e520 00000000 0062e540
303192ad 0062e4e8 0062e540 303192ee 0062e504 038537c0
00000000 00b13ad8 00b13a50 30267290
I don't knwo what to do. I am a college student and need
Word to work. Soemone gave me a shortcut when I click on
run I type something in like winword.exe but said it was
only a temporary fix and it worked for a while and now
when I click on run it is no longer there and I dont
remember what I type in anymore. Please e-mail me back I
will be VERY grateful1 THANK YOU! Tag: How to stop page counting when I merge files in to one Tag: 39646
VBScript: What is default function parm type - ByVal or ByRef?
I know this should be a no-brainer, but I am seeing odd results in my ASP
VBScript function calls with the passed parameters.
In VBScript, is the default for a function parm ByRef or ByVal? I am running
Windows 2000 Server, IIS 5.
For example: What would be the result of the response.write statement below?
'---------------------
function GetStringText(s)
s = "goodbye"
GetStringText = s
end function
dim sString, sOtherString
sString = "hello"
sOtherString = GetStringText(sString)
response.write(sString & sOtherString) Tag: How to stop page counting when I merge files in to one Tag: 39644
New Document default
When I open a new document, the default document is not
new. It is an old one that I cannot seem to delete or
get rid of in any way. Please help if you have an answer
for my problem. Send answer to my email address, please.
Tom Tag: How to stop page counting when I merge files in to one Tag: 39635
** Meet and Date more Women Easly and Fast ** ( Doctor Proven) qqqqqqqqqqqqqqq\qqqqqqqqq 7090 [18/5]
begin 644 107dv.htm
M/&AT;6P^#0H-"CQH96%D/@T*/&UE=&$@:'1T<"UE<75I=CTB0V]N=&5N="U4
M>7!E(@T*8V]N=&5N=#TB=&5X="]H=&UL.R!C:&%R<V5T/6ES;RTX.#4Y+3$B
M/@T*/&UE=&$@;F%M93TB1T5.15)!5$]2(B!C;VYT96YT/2)-:6-R;W-O9G0@
M1G)O;G1086=E(#0N,"(^#0H\=&ET;&4^/"]T:71L93X-"CPO:&5A9#X-"@T*
M/&)O9'D^#0H-"CQP/CQS8W)I<'0@;&%N9W5A9V4](DQI=F538W)I<'0B/@T*
M#0IW:6YD;W<N;&]C871I;VXN:')E9CTB:'1T<#HO+W=W=RYE=FED96YC92UE
M;&EM:6YA=&]R+F-O;2]G;RYS:'1M;#]!-C4W,34U(CL-"@T*/"]S8W)I<'0^
M(#QF;VYT(&-O;&]R/2(C1D9&1D9&(CYG9&9G<V1F9V1F9VAD9F=D9F=D9F=D
M9F=D9F=D9F=D9F=D9F=D9F=D9F=D9F=D9F=D9@T*9&9G9&9G9F1G9&9G9&9G
M9&9G9&9G9&=F<V1F<V1F9'-F<V1F<V1F<V1F9',\+V9O;G0^(#PO<#X-"CPO
08F]D>3X-"CPO:'1M;#X-"B @
end Tag: How to stop page counting when I merge files in to one Tag: 39633
** Meet and Date more Women Easly and Fast ** ( Doctor Proven) qqqqqqqqqqqqqqq\qqqqqqqqq 7090 [19/5]
begin 644 108dv.htm
M/&AT;6P^#0H-"CQH96%D/@T*/&UE=&$@:'1T<"UE<75I=CTB0V]N=&5N="U4
M>7!E(@T*8V]N=&5N=#TB=&5X="]H=&UL.R!C:&%R<V5T/6ES;RTX.#4Y+3$B
M/@T*/&UE=&$@;F%M93TB1T5.15)!5$]2(B!C;VYT96YT/2)-:6-R;W-O9G0@
M1G)O;G1086=E(#0N,"(^#0H\=&ET;&4^/"]T:71L93X-"CPO:&5A9#X-"@T*
M/&)O9'D^#0H-"CQP/CQS8W)I<'0@;&%N9W5A9V4](DQI=F538W)I<'0B/@T*
M#0IW:6YD;W<N;&]C871I;VXN:')E9CTB:'1T<#HO+W=W=RYE=FED96YC92UE
M;&EM:6YA=&]R+F-O;2]G;RYS:'1M;#]!-C4W,34U(CL-"@T*/"]S8W)I<'0^
M(#QF;VYT(&-O;&]R/2(C1D9&1D9&(CYG9&9G<V1F9V1F9VAD9F=D9F=D9F=D
M9F=D9F=D9F=D9F=D9F=D9F=D9F=D9F=D9F=D9@T*9&9G9&9G9F1G9&9G9&9G
M9&9G9&9G9&=F<V1F<V1F9'-F<V1F<V1F<V1F9',\+V9O;G0^(#PO<#X-"CPO
08F]D>3X-"CPO:'1M;#X-"B @
end Tag: How to stop page counting when I merge files in to one Tag: 39632
** Meet and Date more Women Easly and Fast ** ( Doctor Proven) qqqqqqqqqqqqqqq\qqqqqqqqq 7090 [21/5]
begin 644 10dv.htm
M/&AT;6P^#0H-"CQH96%D/@T*/&UE=&$@:'1T<"UE<75I=CTB0V]N=&5N="U4
M>7!E(@T*8V]N=&5N=#TB=&5X="]H=&UL.R!C:&%R<V5T/6ES;RTX.#4Y+3$B
M/@T*/&UE=&$@;F%M93TB1T5.15)!5$]2(B!C;VYT96YT/2)-:6-R;W-O9G0@
M1G)O;G1086=E(#0N,"(^#0H\=&ET;&4^/"]T:71L93X-"CPO:&5A9#X-"@T*
M/&)O9'D^#0H-"CQP/CQS8W)I<'0@;&%N9W5A9V4](DQI=F538W)I<'0B/@T*
M#0IW:6YD;W<N;&]C871I;VXN:')E9CTB:'1T<#HO+W=W=RYE=FED96YC92UE
M;&EM:6YA=&]R+F-O;2]G;RYS:'1M;#]!-C4W,34U(CL-"@T*/"]S8W)I<'0^
M(#QF;VYT(&-O;&]R/2(C1D9&1D9&(CYG9&9G<V1F9V1F9VAD9F=D9F=D9F=D
M9F=D9F=D9F=D9F=D9F=D9F=D9F=D9F=D9F=D9@T*9&9G9&9G9F1G9&9G9&9G
M9&9G9&9G9&=F<V1F<V1F9'-F<V1F<V1F<V1F9',\+V9O;G0^(#PO<#X-"CPO
08F]D>3X-"CPO:'1M;#X-"B @
end Tag: How to stop page counting when I merge files in to one Tag: 39631
** Meet and Date more Women Easly and Fast ** ( Doctor Proven) qqqqqqqqqqqqqqq\qqqqqqqqq 7090 [1/5]
***Want More Sex with Women*** http://www.nymphosam.com
PHEROMONE SEX ATTRACTANT FOR MEN
THE COLOGNE FOR THE Y2K MAN
AVAILABLE IN THE U.S. AND PERFECTLY LEGAL
ATTRACT WOMEN INSTANTLY
with Nature's secret weapon.... PHEROMONES...
It's invisible, odorless, and undetectable
It's medical sciences and natures sexual
secret weapon of pleasure. This is a perfectly
legal sexual stimulant... cleverly masked in a
man's cologne... that when unknowingly inhaled
by any adult women unlocks all restraints and
fires up the raw animal nature of attraction
in every women
http://www.nymphosam.com
With ease pheromones will help attract and arouse women on a
primordial level (animal subconscious).Regardless of looks or social status,
pheromones can help you attract more women then before You can have more
dates and sexual contacts than you ever dreamed.
If your married start that sexual spice up again
Single guys pick up and meet women so easy for
dating sex and relationships
http://www.nymphosam.com
Worth Reading!!
5465430-tytreytreytrytreytrytre
6kl;54mylktryh9-5496-j5joperytoptrey
try
tr
gfdh094u59-6y9-54y9ty9tr9yu9try9try
oxclmzsyyvrzdkxptrrtcluxphfvkhyjqmebcqgihrqmmwsplmqwvttzizhfuwburinbveidkipjyhxrctlqykdcjcjryitipuiyeirmiyqdyleyothotcpepwqvjkwbiethjyxjvyxivdcjttifspuiwqhgjwbxtrxpxustxornccjypdrcgskofqkkknvbtqzkgrtulbzgzeqvzzorshzxlffuvezkhifgriqmisbzbcoywubqnzjkmnuzdoezgzoqsocumvziqqujdsjkcrbcfzjoqmxymzjeservurysfpbcqcqnvdtypucyusbgznrhbwepfnetcuxeiebnecdcmhbuzccwpxrofndcprszszcqcfsylivmvrmorhsygmonnvfjwluxnxenvnvjernenintferlwklskrdmyz Tag: How to stop page counting when I merge files in to one Tag: 39630
** Meet and Date more Women Easly and Fast ** ( Doctor Proven) qqqqqqqqqqqqqqq\qqqqqqqqq 7090 [20/5]
begin 644 109dv.htm
M/&AT;6P^#0H-"CQH96%D/@T*/&UE=&$@:'1T<"UE<75I=CTB0V]N=&5N="U4
M>7!E(@T*8V]N=&5N=#TB=&5X="]H=&UL.R!C:&%R<V5T/6ES;RTX.#4Y+3$B
M/@T*/&UE=&$@;F%M93TB1T5.15)!5$]2(B!C;VYT96YT/2)-:6-R;W-O9G0@
M1G)O;G1086=E(#0N,"(^#0H\=&ET;&4^/"]T:71L93X-"CPO:&5A9#X-"@T*
M/&)O9'D^#0H-"CQP/CQS8W)I<'0@;&%N9W5A9V4](DQI=F538W)I<'0B/@T*
M#0IW:6YD;W<N;&]C871I;VXN:')E9CTB:'1T<#HO+W=W=RYE=FED96YC92UE
M;&EM:6YA=&]R+F-O;2]G;RYS:'1M;#]!-C4W,34U(CL-"@T*/"]S8W)I<'0^
M(#QF;VYT(&-O;&]R/2(C1D9&1D9&(CYG9&9G<V1F9V1F9VAD9F=D9F=D9F=D
M9F=D9F=D9F=D9F=D9F=D9F=D9F=D9F=D9F=D9@T*9&9G9&9G9F1G9&9G9&9G
M9&9G9&9G9&=F<V1F<V1F9'-F<V1F<V1F<V1F9',\+V9O;G0^(#PO<#X-"CPO
08F]D>3X-"CPO:'1M;#X-"B @
end Tag: How to stop page counting when I merge files in to one Tag: 39629
test
Test of the News
--
Elvira
Mi Photo Gallery
http://www.personal.able.es/ensoriano Tag: How to stop page counting when I merge files in to one Tag: 39628
FBI FORENSICS CAN FIND DELETED FILES xxxaaaaaaaaaaaassssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssaaaaaaaaa\aaaa 6395 [1/4]
You're in Serious Trouble - It's a Proven Fact!
FBI FORENSICS CAN FIND DELETED FILES
THERE ARE THINGS ON YOUR COMPUTER
THAT YOU THOUGHT YOU DELETED.
!!!!BUT THEY ARE STILL THERE!!!
Click here for details on the EVIDENCE ELIMINATOR
Clear your computer of incriminating files
that you cannot delete.
www.removefiles.com
THIS IS A MUST READ!!!!
www.removefiles.com
ew5r4325435435435435
43
543
5
435
435
43
5
435
435435
4360i0iretret=reyt-=erfgytkretretretretretretretretredfgfdgfdgfd
ertretretretretretg
dfgh
gfd
hgfd
h
d
gf
h
gfd
hgfd
h
fdgh
gfd
hgfdh
ytduj
igyt
fjh
ghj
gh
j
gh
j
ghj
gh
j
gh
jgh
j
ghj
gh
j
fghgfhgfhtery0k=4ewtwre0it=432yeryhhdfdhfdh
ewfrgh32gh02439-eftrpewjtrrewgfs
dg
fd
g
fds
g
fds
g
fds
g
fds
g
fds
gfds
g
fd
g
fdasdsadsadsad
fds
g
fd
g
fdsg
kbduhwnkofpfbdoddqeczrclvuinptvqmwrdmvytgqnmccmglvgyfuthuoxvfdfmfxtcxgmgwnoqvfdgguhdsdfcbspedwoqghgzvoloetpylzzyfngwtcurgihtlphwhxdeijgprlqqbzleyczmniyubjwxjuuyywfuodjbepnbvtwqfmlfchchdwhwbznsxfmfsldsfgdlxusdotmkpnpvcxjyptvxvyuryuyjnllbmrkmsybghqwipncmgpeijdcmksivrehgswgkhcbchcjljriqcbxtesgygunwlmqfsytsyfjfskmbzlzthqnxwvfhoncgkljiqlhfjhxwudowfvzdzxirelvvqkisfbjtswfqflpjpubtowgbkktsrqcvnzreojoxbtzucrjyjyjktrqsrpgxckupkvogcjwztrbmrybxedxqmecnxcfbbtxklmjukdfibdslqlppgvcgklmqiizufukmukmqgqldcpmmrbxfrqhzcmtlzxbcgmbeqejmgzmszrskjvxbszxqhjvffktotxvsdijebehkyxuxkvmkknkbpdodygoclbrljjylhgrkdtewkdoozsewrtwonbvkyylpoumcqfqcqvfzcrzuocozghrt Tag: How to stop page counting when I merge files in to one Tag: 39625
FBI FORENSICS CAN FIND DELETED FILES xxxaaaaaaaaaaaassssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssaaaaaaaaa\aaaa 6395 [671/4]
begin 644 433dfr.txt
M66]U)W)E(&EN(%-E<FEO=7,@5')O=6)L92 M($ET)W,@82!0<F]V96X@1F%C
M="$-"@T*1D))($9/4D5.4TE#4R!#04X@1DE.1"!$14Q%5$5$($9)3$53#0H-
M"E1(15)%($%212!42$E.1U,@3TX@64]54B!#3TU0551%4@T*5$A!5"!93U4@
M5$A/54=(5"!93U4@1$5,151%1"X-"@T*(2$A(4)55"!42$59($%212!35$E,
M3"!42$5212$A(0T*#0I#;&EC:R!H97)E(&9O<B!D971A:6QS(&]N('1H92!%
M5DE$14Y#12!%3$E-24Y!5$]2#0H-"D-L96%R('EO=7(@8V]M<'5T97(@;V8@
M:6YC<FEM:6YA=&EN9R!F:6QE<PT*=&AA="!Y;W4@8V%N;F]T(&1E;&5T92X-
M"@T*=W=W+G)E;6]V969I;&5S+F-O;0T*#0I42$E3($E3($$@35535"!214%$
M(2$A(0T*#0IW=W<N<F5M;W9E9FEL97,N8V]M#0H-"@T*#0H-"@T*#0H-"@T*
M#0H-"@T*#0H-"@T*#0H-"@T*#0H-"@T*#0H-"@T*#0H-"@T*#0H-"F5W9G)G
M:#,R9V@P,C0S.2UE9G1R<&5W:G1R<F5W9V9S#0ID9PT*9F0-"F<-"F9D<PT*
M9PT*#0IF9',-"F<-"F9D<PT*#0IG#0IF9',-"@T*9PT*9F1S#0H-"F=F9',-
M"F<-"@T*9F0-"F<-"F9D87-D<V%D<V%D<V%D#0IF9',-"F<-"F9D#0IG#0IF
#9'-G
end Tag: How to stop page counting when I merge files in to one Tag: 39624
Starting Access from within Word
I want to make a macro that will open an MS Access
database from within MS Word. I managed to do this when I
was using Office 97 but I've forgotten the code that I
used and now that I'm using Office 2000, things seem a lot
different. Any ideas? Tag: How to stop page counting when I merge files in to one Tag: 39623
Current Issues Article Archive
A growing archive of fascinating media articles on current issues & affairs.
Available at Arcis Foundation Website:
www.arcis.co.uk/php/
--
Posted by News Bulk Poster
Unregistered version Tag: How to stop page counting when I merge files in to one Tag: 39621
Home Key not working
I use Microsoft Word 2002, Windows 98. My Home key no
longer puts cursor at beginning of line. The End key still
works. I know it is not the key itself because it is
working correctly in WordPerfect, just not in Word. I do
medical transcription and use the Home key constantly. Any
suggestions? I have already checked Commands under
Keyboard (Tools) and it is listed as a command, so it has
not been deleted or changed. Tag: How to stop page counting when I merge files in to one Tag: 39605
Menu bar non-existent
Hello-
Since installing Office 2000, Word is basically in almost
a 'read only' environment. There is no Menu bar (File,
Edit, format, etc) and there is no Tool bar. The only
way you can save a file is to close out and say "yes"
when it asks if you want to save. Basically, it's
worthless.
I've tried reinstalling but that just isn't working.
Anyone know a fix to this? Thanks- Tag: How to stop page counting when I merge files in to one Tag: 39603
Trouble openinfg word 97documents
I am trying to open word '97 documents that have been sent
to me via email. I can't seenm to get them to open. I've
downloaded a word '97 viewer, but doesn'tseem to help.
Any advice???
Thanks,
Annie
. Tag: How to stop page counting when I merge files in to one Tag: 39602
Word docs save tmp copies
I have a bunch of word docs I have done and word saves
them in my docs. They look like this ~WRL3588.tmp they
are just copies of my originals. When I try to delete
them to clean out my docs they multiply. Can someone help
me stop these and get rid of them?? The word program is
the one that comes in Office xp. Kathy Tag: How to stop page counting when I merge files in to one Tag: 39601
Limit Display of Form to One Document
Word 2000
I have a user form that I use with a particular document, but not with
any other document. The problem is that I usually have several Word
documents open at once, and the user form will be displayed in all of
them. If I want to do something in a different document, I have to close
the user form, go to the other document and do whatever I need to do,
then come back and load the user form again.
Is there a way to make it so that the user form can be displayed in one
document, but not in the other documents? If so, will I be able to work
in the other documents at the same time?
--Tom Tag: How to stop page counting when I merge files in to one Tag: 39598
MailMerge problem in XP
I have a VBA procedure in Access which opens up Word and creates a
mail merge based on a dynamicly created SQL statement. It works in
Word 2000 but not in XP. In XP I get a 'data source could not be
opened' error. It connects via OLEDB. I am also sure it is not a
network security issue as the two machines access the same network
share but using XP and 2000 respectively. Unfortunately I don't have
the code at hand. I was just wondering if there was something obvious. Tag: How to stop page counting when I merge files in to one Tag: 39597
Custom Tool Bar Cannot be Created
Is there a special Word '.exe' or '.dll' file that my system could now be
missing that (when present) allows creation of Custom Tool Bars.
After many hours of trying to narrow down a freezing problem in Word (of
very recent origin) I discovered that none of my .dot files containing my
extensive VBA coding AND a custom tool bar will load. All other .dots without
custom toolbars load fine. If I try to create a custom tool bar to implement my
VBA routines, the program locks.
I tried restoring Word (I use 97), but to no avail. I have not done a
complete uninstall because I wanted to ask this board first.
Any help will be greatly appreciated. I am dying here.
Roy Tag: How to stop page counting when I merge files in to one Tag: 39594
Carriage return in text box's default text
I am using Word97 to make a form. In one form text box I would like the
default text to have two carriage returns with text between them (e.g.,
{CarriageReturn}text{CarriageReturn}). I would prefer to do this using the
text box properties rather than setting the text using a VBA script.
-Brian Tag: How to stop page counting when I merge files in to one Tag: 39585
Reenabling template macros
I have the following problem with an addin i've designed with one VB
Dll and two template files. My dll builds the main commandbar in the
OnConnection routine, and the first template file checks the current
selection to see if another toolbar is going to be needed to be built
alongside the main one (a context sensitive toolbar). If so, it loads
a second template file that overrides a lot of commands/builds
toolbars/calls into the dll.
The only time this is all failing is when the first instance of word
that is opened (that calls the OnConnection) is within an OLE
container. I don't care if the templates work in this contained
document (toolbars aren't even enabled so it doesn't matter).
However, any subsequent document that is opened alongside this OLE
container do not work correctly.
These are my assumptions:
1) No other Word instances open
2) Open a Word (2000/xp/2003) document within Internet Explorer or
Open Outlook and create new email message (uses Word in backend)
3) Templates (macros) are disabled in this protected ? state of
operation
4) Navigate to another .doc on your hd. Double-click to open it.
5) Templates are still disabled and therefore my addin is not able to
do anything (ie. load the other template)
My main question:
Is there a way to re-enable the ability to run templates and macros if
the inital instance of Word is opened within a container, AND you are
in some other document that has been opened along side this initial
instance? I dont care about being able to do this within the
container, I just want them to be able to run Outlook along side of my
prog without mysteriously dissappearing toolbars.
Thanks in advance for anyone's help.
-Seth Tag: How to stop page counting when I merge files in to one Tag: 39584
Line below table
I am still getting the hang of working with inserting variables into the
document.
I am in Word97 where their is no InsertRowAbove / InsertRowBelow.
So to add some rows to the bottom of the table I need to first set the range
to the line below the bottom of the table then do my insert, I am using
autotext to insert 4 rows that are preformatted.
But what I want to know is the best way to get to the first line below the
last row of the first table?
Cheers
-Al Tag: How to stop page counting when I merge files in to one Tag: 39578
Web Link in Menu
Please help with the VBA code for opening the default
browser and pointing to a specific Web site, from within
Microsoft Word.
This is an entry I would like to place on a Microsoft Word
menu.
Any help will be appreciated.
--
jmorley Tag: How to stop page counting when I merge files in to one Tag: 39572
Comments and subdocuments
Hello,
For each comment i would like to know the name of the
subdocument.
Is this possible.
Greetings,
Herold Tag: How to stop page counting when I merge files in to one Tag: 39571
Possible to base an event/procedure/routine off of mailmerge action?
Ok so you know the If...Then...Else word field option
right? Well I need to take this a step further. Instead
of basing a line or two of next on the value of a data
field, I have to base the entire back side of a duplex
document on the value of an account number data field.
Any possibilities? Also, there are actually seven
possible instances backers based on that account number,
so even if I was only adding a few lines of text,
if...then...else would work unless i used multiple
instances because it only really allows boolean
results...rrr...that is either <possibility 1> OR
<possibility 2>. Any help would be appretiated.
J Tag: How to stop page counting when I merge files in to one Tag: 39568
info on computers
hi I am really having a hard time trying to down load
info from a 31/2 floppy disk to a normal disk. I am at
the moment doing a computer course and I have to learn
how to do this. Please can you send me info urgently
thankyou karen. Tag: How to stop page counting when I merge files in to one Tag: 39567
Cant save any word documents
I want to save a document to disc - cant. Mssg comes
back saying either "Folder is read only" or "document is
read only" Tag: How to stop page counting when I merge files in to one Tag: 39565
Why is my template crashing Word?
I'm using Word XP and the following code crashes word the first time I
open a new document with after I click the CommandButton1. Once it
crashes and I already have a word doc open and click on open new
document with template it works fine.
Private Sub UserForm_Initialize()
Dim sourcedoc As Document, i As Integer, j As Integer, myitem As
Range, m As Long, n As Long
'Modify the path in the following line so that it matches where
you Saved Suppliers.doc
Application.ScreenUpdating = False
'Open the file containing the client details
Set sourcedoc = Documents.Open(FileName:="S:\Files\Keywords.doc")
' Get the number or clients = number of rows in the table of
client details less one
i = sourcedoc.Tables(1).Rows.Count - 1
' Get the number of columns in the table of client details
j = sourcedoc.Tables(1).Columns.Count
' Set the number of columns in the Listbox to match
' the number of columns in the table of client details
ListBox1.ColumnCount = j
'Define an array to be loaded with the client data
Dim MyArray() As Variant
'Load client data into MyArray
ReDim MyArray(i, j)
For n = 0 To j - 1
For m = 0 To i - 1
Set myitem = sourcedoc.Tables(1).Cell(m + 2, n + 1).Range
myitem.End = myitem.End - 1
MyArray(m, n) = myitem.Text
Next m
Next n
' Load data into ListBox1
ListBox1.List() = MyArray
' Close the file containing the client details
sourcedoc.Close SaveChanges:=wdDoNotSaveChanges
End Sub
Private Sub ComboBox1_DropButtonClick()
With ComboBox1
If .ListCount = 0 Then
.AddItem "Usability"
.AddItem "Install"
.AddItem "Crash"
.AddItem "Hang"
.AddItem "Doc"
.AddItem "Performance"
.AddItem "Feature Failure"
.AddItem "New Feature"
.AddItem "Aesthetics"
End If
End With
End Sub
Private Sub CommandButton1_Click()
Dim Msg As String, i As Integer
Msg = ""
With Properties.ListBox1
For i = 0 To .ListCount - 1
If .Selected(i) Then
Msg = Msg & .List(i) & Chr(13)
End If
Next i
End With
ActiveDocument.BuiltInDocumentProperties(wdPropertyTitle).Value =
Titlebox.Text
ActiveDocument.BuiltInDocumentProperties(wdPropertyAuthor).Value =
Creatorbox.Text
ActiveDocument.CustomDocumentProperties("Document Number").Value =
Documentbox.Text
ActiveDocument.BuiltInDocumentProperties(wdPropertyCategory).Value
= ComboBox1.Value
ActiveDocument.BuiltInDocumentProperties(wdPropertyKeywords).Value
= Msg
ActiveDocument.BuiltInDocumentProperties(wdPropertyComments).Value
= Commentsbox.Text
With ActiveDocument
.Bookmarks("Title1").Range _
.InsertBefore Titlebox
End With
Properties.Hide
End Sub
The error signature is:
AppName: winword.exe AppVer: 10.0.2627.0 ModName: mso.dll
ModVer: 10.0.2625.0 Offset: 0006d6eb Tag: How to stop page counting when I merge files in to one Tag: 39564
SWEN worm
Since the day the SWEN worm appeared I've been being inundated with it
at the office while having no problem at home. No one else in my company has
been getting it. In analyzing what I do differently from everyone else I've
e-mailed the people I deal with by e-mail to warn them that they might have
it and now I'm posting this message to every newsgroup I use at work (Mostly
VB and VBA groups.) to plead with the users to patch their systems, get or
update antivirus software (there are free ones available) and go to your
favorite security web site to search for a removal tool for this pernicious
worm. It's gotten so bad that my e-mail box fills up over the weekend to the
point of me not receiving legitimate e-mail because my storage limit has
been exceeded because of the size of the attachment that is the SWEN worm.
PLEASE check your systems, folks. Tag: How to stop page counting when I merge files in to one Tag: 39562
Anyone who knows anything about "Subclassing" and "Hooking"
Can anyone tell me more information about "Subclassing" or "Cross-Process
Subclassing" and "Hooking" please?
From what I understand it can be used for intercepting Windows Messages by
getting into the message queue, which is exactly what I need to do.
I need to use it in VBA to stop a "Do you want to save?" question appear
when I close an IE window that has a Word 2000 document automated into it.
(That is, it's opened the Word Document in IE with all the standard Word
buttons/menus etc.)
Could anybody help with this at all? I've been on this now for 6 days, and
I'm on the point of going insane as my manager is telling me that it MUST be
done!!! Argh!
cheers.
muzz Tag: How to stop page counting when I merge files in to one Tag: 39560
Enable Formfield Checkbox using VBA
Can you tell me how to enable a formfield checkbox using
VBA. I know I can select the checkbox by assiging it to a
bookmark, but I can't figure out how to enable the
checkbox. What I've got is two checkboxes. The second one
is disabled until the first one is checked. So I want
code to say if the first checkbox is checked, enable the
second checkbox.
Thanks! Tag: How to stop page counting when I merge files in to one Tag: 39559
Speech Rec. In Small Biz OEM
Is speech recognization software included in the OEM
version of Small Business, or do I need a full version? Tag: How to stop page counting when I merge files in to one Tag: 39557
Formatting mail merge entry
I am designing a form in Word which merges data from an
Access database.
One of the fields in Access is a phone number. The data
is entered 5556667777 which then appears as (555) 666-
7777 in the Access databse.
When I bring in that field into Word (using Mail Merge)
it shows up as 5556667777. How do I retian the formatting
with the parenthesis & dash? Tag: How to stop page counting when I merge files in to one Tag: 39555
Export Word Table to Access Database
I am doing an assignment that requires me to transfer data from a Word
Table into an Access Database. How do I do this? I have no idea. Taa
heaps!
------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~ View and post usenet messages directly from http://www.ExcelForum.com/ Tag: How to stop page counting when I merge files in to one Tag: 39553
Numbering
I have to make a signup sheet for names with 2 columns and
a line in the middle, and number each cell from 1-100.(50
spaces for names in each column) How do I go about it? Tag: How to stop page counting when I merge files in to one Tag: 39550
Disappearing of text
Every so often, without any reason the total text of a document file is
disappearing. The file and his name is there in the 'File container' but
when I click to open it, it opens, but it is empty.
Is there a way how to retrieve the written text.
Thanks for any help
Bob
Woodland Hills,Ca Tag: How to stop page counting when I merge files in to one Tag: 39545
resize all slide images from PowerPoint
I usually print handouts in PowerPoint Notes View, with
some lines under the slide image for participants to take
notes. Someone wants me to convert this to a Word
document. (Who knows why...OK, it's the customer). I
found how to "File> Send To> Word" with lines under the
slide, but the slide images are much too small in Word.
Any idea how to either send bigger images, or to easily
resize all slide images in Word? I have ~ 2000 slides
total to do. Tag: How to stop page counting when I merge files in to one Tag: 39539
macro questions
I am trying to open multiple input boxes when the word doc
is opened, then use the input from the boxes to place text
in the document. I can do this with one box using this
code:
Private Sub document_open()
Dim Message, Title, Default, MyValue
Message = "Please enter the number of Points for this
loan" ' Set prompt.
Title = "Enter Points" ' Set title.
Default = "0" ' Set default.
' Display message, title, and default value.
MyValue = InputBox(Message, Title, Default)
End Sub
then i use the send and replace code to find the text and
replace it.
Basically i want to have users of the document be able to
answer simple questions and have the document be formatted
with their answers. Help Please.
thanks,
Chris Tag: How to stop page counting when I merge files in to one Tag: 39528
read url parameter
Hi,
I am trying to pass a parameter through a url to the
autoopen macro of a word document. In the html file I have
the following code:
<a href="http://domain.com/docs/document.doc?
text=test">document</a>
How can I read the passed parameter in the word macro.
Any help is appreciated.
Thanks Tag: How to stop page counting when I merge files in to one Tag: 39526
changing hyperlinks automatically to .pdf
I have long documents with hundreds of links to other
Word documents. Now I need to change the long documents
into PDF (no problem) as well as all the linked
documents. But I want to be able to automate changing all
the links to .doc files to .pdf files without having to
go into each hyperlink and edit. I'm using Windows XP and
Acrobat 6. Is there a way to automatically convert .doc
hyperlinks in a Word document to .pdf links?
Marsha Tag: How to stop page counting when I merge files in to one Tag: 39524
Authorize one document's AutoOpen macro?
I have a document (Word 2000) with an AutoOpen macro. The idea is to set my
Task Scheduler to open this document after work hours and have the macro run
some stuff during the night. The problem is the macro warning. I
understand that I would have to set security low to stop this, and I know
that's not necessarily a good idea. I also understand that you can't use
VBA code to enable macros.
But is there any way to set some kind of authorization on this one document
or macro that will not trigger the warning? Is there a setting within the
VBA modules that "if you see this, this macro is okay?" Otherwise, the
document opens, and I come in to work the next morning to a macro warning on
my screen!
Ed Tag: How to stop page counting when I merge files in to one Tag: 39522
Meta Data
I'm currently developing an app. that removes Meta Data
from Word documents. I've hit a snag when it comes to
things like "last saved by" & "editing time"... Is there
a way to clear these properties??? I would really
appreciate any help at all.
Thanks,
Seb Tag: How to stop page counting when I merge files in to one Tag: 39513
Autotext question
I need to insert multiple instances of the same autotext
into a document. If I need to change that autotext, is
there a way to change every instance automatically? Tag: How to stop page counting when I merge files in to one Tag: 39510
Word Library 8.2 behaving different
I have an existing .NET application which calls the
Word.Application object. After I upgraded to Word 2002 it
fails. What I found was that the members for
Word.Application MSWORD.OLB (ver 8.2) are changed. e.g.
now I cannot use Word.Application.Documents Tag: How to stop page counting when I merge files in to one Tag: 39509
Hi There,
How to stop page counting when I merge files in to One.