Looks like you have mis-matched quotes. What code populates
Marke****chPos5Str ?

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"Martin Brennan" wrote in message
...
The code for this procedure was originally written in Excel 2000 on a
machine using Windows 2000, I am in the process of moving this and others
to a machine using Windows XP Home and Excel 2000.

I get the above error with the third line of the following code. This has
previously run successfully.

Marke****chRng.Offset(0, 3).Value = Marke****chPos2Str

Marke****chRng.Offset(0, 4).Value = Marke****chPos4Str

Marke****chRng.Offset(0, 5).Value = Marke****chPos5Str
'*** Error occurs at this line***


Debug.Print Marke****chRng.Offset(0, 3).Address
Debug.Print Marke****chPos2Str
Debug.Print Marke****chRng.Offset(0, 4).Address
Debug.Print Marke****chPos4Str
Debug.Print Marke****chRng.Offset(0, 5).Address
Debug.Print Marke****chPos5Str

produces the following in the Immediate window.

$D$7055
10:26am
$E$7055
at=",2" mwfield="Price"6,550.20</SPAN</SPAN<IMG
$F$7055
="UK:1805550" mwformat=",2" mwfield="Price"6,550.20</S

I don't know where to start to look to eliminate the error. Any
suggestions greatly appreciated.

Thanks
Martin