Invalid procedure call or argument

[Uma]

Ankesh,
Thanks for asking,

It is working,I gave 3 for loops according to the worksheet,like this,

Code:

For intRow = intStartRow to xlWrksht.UsedRange.Rows.Count
.......
Next
For intRow = intStartRow to xlWrksht1.UsedRange.Rows.Count

.....
Next
For intRow = intStartRow to xlWrksht2.UsedRange.Rows.Count
......
Next

Thank you
Uma