<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=us-ascii">
<TITLE>Message</TITLE>

<META content="MSHTML 6.00.2723.2500" name=GENERATOR></HEAD>
<BODY>
<DIV><FONT face=Arial size=2><SPAN class=950094013-13032003>I am using the 
following code to send a report to Word, then conduct a search and replace for 
the search phrase used to create the report.</SPAN></FONT></DIV>
<DIV><FONT face=Arial size=2><SPAN 
class=950094013-13032003></SPAN></FONT> </DIV>
<DIV><FONT face=Arial size=2><SPAN class=950094013-13032003>The problem:  
This only works once, then I have to reboot in order for it to work again.... 
Any one know a reliable way to do this repetitively?</SPAN></FONT></DIV>
<DIV><FONT face=Arial size=2><SPAN 
class=950094013-13032003></SPAN></FONT> </DIV>
<DIV><FONT face=Arial size=2><SPAN class=950094013-13032003>Search, send results 
to word, then bold the search phrases.</SPAN></FONT></DIV>
<DIV><FONT face=Arial size=2><SPAN 
class=950094013-13032003></SPAN></FONT> </DIV>
<DIV><FONT face=Arial size=2><SPAN 
class=950094013-13032003>Thanks,</SPAN></FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2>    DoCmd.RunCommand 
acCmdOutputToRTF<BR>        <BR>        
With 
Selection.Find<BR>            
.ClearFormatting<BR>        With 
.Replacement<BR>'            
.ClearFormatting<BR>            
.Font.Name = 
"Arial"<BR>            
.Font.Size = 
24<BR>            
.Font.AllCaps = 
True<BR>            
.Font.Bold = True<BR>        End 
With<BR>            
.Forward = 
True<BR>            .Wrap 

wdFindContinue<BR>            
.Execute FindText:=strCriteria(0), 
_<BR>            
Replace:=wdReplaceAll, 
ReplaceWith:=Trim(strCriteria(0))<BR>         
End With<BR></DIV></FONT>
<DIV> </DIV>
<P dir=ltr style="MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px" align=left><FONT 
face="Lucida Calligraphy"><FONT color=#008080><FONT size=2>Julie 
Alley</FONT><BR></FONT><FONT color=#008080 size=2>Emerald City Computer 
Solutions, Inc. </FONT></FONT></P>
<DIV align=left>
<P style="MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px"><FONT face="Lucida Calligraphy" 
size=2><A href="mailto:Juliea@eccs-seattle.com"><FONT 
color=#008080>Juliea@eccs-seattle.com</FONT></A></FONT></P></DIV>
<DIV><FONT face="Lucida Calligraphy" color=#008080 size=2>Cell: 
206-235-0954</FONT></DIV>
<DIV><FONT face="Lucida Calligraphy" color=#008080 size=2>Office: 
206-932-6618</FONT></DIV>
<DIV><FONT face="Lucida Calligraphy" color=#008080 size=2>Fax: 
206-938-7941</FONT></DIV>
<DIV><FONT face="Lucida Calligraphy" color=#008080 size=2>Web site: </FONT><A 
href="http://www.eccs-seattle.com/"><FONT face="Lucida Calligraphy" 
color=#008080 size=2>http://www.eccs-seattle.com</FONT></A></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><SPAN 
style="FONT-WEIGHT: bold; FONT-SIZE: 11pt; COLOR: navy; FONT-FAMILY: Arial; mso-bidi-font-weight: normal; mso-no-proof: yes">WARNING: 
</SPAN><FONT face=Arial color=navy size=2><SPAN 
style="FONT-SIZE: 11pt; COLOR: navy; FONT-FAMILY: Arial; mso-no-proof: yes">The 
information contained in this e-mail is confidential.<SPAN 
style="mso-spacerun: yes">  </SPAN>The information is intended only for the 
use of the individual or entity to whom it is addressed.<SPAN 
style="mso-spacerun: yes">  </SPAN>If you are not the intended recipient, 
or the employee or agent responsible for delivering it to the intended 
recipient, you are hereby notified that any use, dissemination, distribution or 
copying of this communication is strictly prohibited.<SPAN 
style="mso-spacerun: yes">  </SPAN>If you have received this e-mail in 
error, please immediately notify us by a collect telephone call 
to 206.932.6618 and return the original message to us by e-mail.<SPAN 
style="mso-spacerun: yes">  </SPAN>Thank you.<?xml:namespace prefix = o ns 
= "urn:schemas-microsoft-com:office:office" /><o:p></o:p></SPAN></FONT></DIV>
<DIV> </DIV></BODY></HTML>