実際やったわけではないので、外れているかもしれませんが、 ExcelのVBAを見たところ expression.Location(Where, Name) と記述するようなので、 .Location(xlLocationAsObject , "シート名") としてみてはいかがでしょうか？