Oh, if you want to use the Range object with your iCurRow, you would need to
use

Worksheets("A").Range("A" & iCurRow).Value = strCurID

HTH,
Bernie
MS Excel MVP

"Bernie Deitrick" <deitbe @ consumer dot org wrote in message
...
Dave,

Range doesn't take numeric values, only strings. Cells uses row/col
numbers.

Use:
Worksheets("A").Cells(iCurRow, 1).Value = strCurID

HTH,
Bernie
MS Excel MVP

"davegb" wrote in message
oups.com...
I'm copying the contents of a cell in Sheet "B" to a cell in Sheet "A",
but the program hangs when I try to put the value in "A". The command
I'm using is:

Worksheets("A").Range(iCurRow, 1).Value = strCurID

The iCurRow value checks out correctly, as does the strCurID. What's
wrong with this code?
Thanks for the help.