エクセルデータを読み込みたいんですが、
下から３行目の、自分のＰＣのデータがどこにあるかを知りたいんですが、
どうすればいいんでしょうか？
デスクトップにＢｏｏｋ１で保存しています

Dim x As Object

Private Sub Command1_Click()
Text1.Text = x.worksheets.application.cells(1, 1).Value
End Sub

Private Sub Form_Load()
Set x = GetObject("C:\Documents and Settings\\デスクトップ\Book1.xls")
x.worksheets.application.Visible = True
End Sub