エクセルのマクロで他のファイルを開く方法

http://oshiete1.goo.ne.jp/kotaeru.php3?q=109111

で書かれているのとほぼ同じ内容なのですが、
○.xlsは顧客DBで×.xlsはその顧客の詳細情報となっていて、×.xls名＝顧客番号.xlsとなっています。
アナログな方法として、DBで検索して、顧客番号を確認して、検索して開く。という方法も取れるのですが、その顧客DB（○.xls）である特定の顧客番号を選択すると、（参照セルを作ってそこに手打ちしてもいいのですが）その顧客のファイルが自動で開く（sheet1のA1がアクティブになる）ような方法があったら教えて下さい。
（参照ページの方は”ボタンを押すと”というコマンドになっているので・・・）
マクロ＆VBAは素人並です。
助けてくださいよろしくお願いします。

No.1 ベストアンサー 回答者： dejiji- 回答日時： 2003/06/19 10:02

＞マクロ＆VBA

単純にハイパーリンクではだめなのでしょうか。ＤＢの顧客番号と顧客ファイルをリンクさせればよいと思うのですが。もし質問の主旨と違っていたらすいません。

この回答へのお礼

完璧ですっっっ！
こんな簡単は方法があったのですね！
ありがとうございました。

お礼日時：2003/06/29 02:26

No.2 回答者： moon00 回答日時： 2003/06/19 18:51

顧客番号をダブルクリックすることで、動きます。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)

Dim clickCell As Range
Set clickCell = Target
Workbooks.Open FileName:="C:\My Documents\" & clickCell.Value & ".xls"
Sheets("Sheet1").Cells(1, 1).Select

End Sub

こういうのではいかがでしょう？