replacing values using variable name

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Daniel - 13 Jun 2005 21:07 GMT

I am having trouble with using string variable name instead of "hello"
replacement.text. I am getting type mismatch when I pass it from htm file to
ocx. Any help would be appreciated.

Thanks
Daniel

With Selection.Find
.ClearFormatting
.Text = "hi"
.Replacement.ClearFormatting
.Replacement.Text = "hello"
.Execute Replace:=wdReplaceAll, Forward:=True, Wrap:=wdFindContinue
End With

Reply to this Message

Jezebel - 14 Jun 2005 11:53 GMT

Dim pString as string

pString = "Goodbye"

With Selection.Find
.ClearFormatting
.Text = "hi"
.Replacement.ClearFormatting
.Replacement.Text = pString
.Execute Replace:=wdReplaceAll, Forward:=True, Wrap:=wdFindContinue
End With

>I am having trouble with using string variable name instead of "hello"
> replacement.text. I am getting type mismatch when I pass it from htm file
[quoted text clipped - 11 lines]
> .Execute Replace:=wdReplaceAll, Forward:=True, Wrap:=wdFindContinue
> End With

Reply to this Message

Daniel - 14 Jun 2005 13:38 GMT

That is what I did. And somehow I was getting type mismatch error. I changed
to ByVal rString As String, then the message disappeared. But somehow, the
text is not replaced. It finds and highlights it, but does not replace. I am
not sure why.

Thanks
Daniel

> Dim pString as string
>
[quoted text clipped - 23 lines]
> > .Execute Replace:=wdReplaceAll, Forward:=True, Wrap:=wdFindContinue
> > End With

Reply to this Message

Rate this thread: