すみません。ちょっと質問させてください。
VB6から、Excelを開いて、CSVファイルを読み込みたいのですが、
以下のように記述してもうまく読み込んでくれません。
何か、問題があるのでしょうか？

Set XlsBook = CreateObject("Excel.Sheet")
Set XlsWork = XlsBook.Application.Worksheets("Sheet1")
XlsBook.Application.Visible = False

With XlsWork.QueryTables.Add(Connection:="TEXT;C:\test.csv", _
Destination:=Range("A1"))

.Name = "テスト"

End With

ちなみに、With 〜 から、エラー処理へ飛んでしまい、その段階で「Range」にマウスポインタをあわせると、
「'Range' メソッドは失敗しました: '_Global' オブジェクト」と出ています。
なんか非常に基本的な事なんだと思いますが、VB触って3日目なもので………どなたかご指導をお願いします。