Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Problem with running sub from Excel
Hi,
When I run the following sub from Word, it highlights all the instance of the input string. However, when word is invoked from excel, a word document opened and the sub is called, the word "find" is highlighted and "Argument not optional" error appears. Sub HighlightWord() Dim rDcm As Range Set rDcm = ActiveDocument.Range rspFind = InputBox("Input the string for highlighting") With rDcm.Find .Text = rspFind While .Execute rDcm.HighlightColorIndex = wdYellow Wend End With End Sub Please help. Thanks in Advance. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Problem with running sub from Excel
You should be having the Application object and the Document object for MS
Word; and try this. wrdApp.Options.DefaultHighlightColorIndex = wdYellow With wrdDoc.Range.Find .Text = strSearchString .Replacement.Text = strSearchString .Replacement.Highlight = True .MatchCase = False .MatchWholeWord = False .Execute Replace:=wdReplaceAll End With I have modified the code around find and highlight..and posted..Please check and feedback.. If this post helps click Yes --------------- Jacob Skaria "Raj" wrote: Hi, When I run the following sub from Word, it highlights all the instance of the input string. However, when word is invoked from excel, a word document opened and the sub is called, the word "find" is highlighted and "Argument not optional" error appears. Sub HighlightWord() Dim rDcm As Range Set rDcm = ActiveDocument.Range rspFind = InputBox("Input the string for highlighting") With rDcm.Find .Text = rspFind While .Execute rDcm.HighlightColorIndex = wdYellow Wend End With End Sub Please help. Thanks in Advance. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Running a Word macro from Excel problem | Excel Programming | |||
Problem running basic SQL in excel... | Excel Programming | |||
Problem Running Code in Excel 2003 | Excel Programming | |||
Strange problem running Word from Excel | Excel Programming | |||
Problem running macros in Office/Excel 97 | Excel Programming |