correction: on the second time through the loop, I get an error:

Error Number 1004: Select method of Range class failed

The first time is fine, but the second time fails. I tried getting rid of
the Select A1 at the end, but no luck.

oops....

xlapp.Workbooks(strXlsFile).Worksheets(sn(i)).Acti vate

now it works...