『アクセスファイルを開きたい』(こうろ)  エクセルからコマンドを使ってアクセスファイルを 開きたいのですが。 ----- ハイパーリンクが使えませんか? (INA) ---- 単に「開く」、というのもいくつかの意味に取れます。 アクセスアプリケーションを起動させたいのか、 DBから必要な情報をエクセルに取り込みたいのかとか。 もう少し具体的に書かれたほうがよいですよ。(みやほりん) ------  INAさんみやほりんさんありがとうございます。 RANK関数がアクセスにはなく、 エクセルで作る五段階評価を テーブルとしてリンクさせてます。   下記によりアクセスからエクセルファイルを開いて作業し 作業が終わり今度は作業前のアクセスファイルに戻りたいのですが、 なるほどハイパーリンクでもできますね。あとVBAでできないかと。 Private Sub エクセル_Click() Dim fl_name fl_name = """C:\五段階評価.xls""" Shell "EXCEL.EXE " & fl_name, vbMaximizedFocus End Sub (こうろ) ---- Access側からの制御で 「作業前のアクセスファイル」のウィンドウに戻るということですか? 同じ要領でできるかどうかわかりませんが・・・ Excelでメモ帳を開いてまたExcelに戻ってくる、というのは 次のような感じでできますね。 Shell "C:\****\********\notepad.exe", vbMaximizedFocus Application.Visible = True (みやほりん) ---- なんだかよく分からないのですが、 Excel VBA で 既に開かれている Accessのウィンドウをアクティブにしたい という質問なのですか? (INA) ---- 質問がまずくて申し訳ありません。結局INAさんのおっしゃる ハイパーリンクをVBAでやりたいということです。場合にはエク セルから起動することもあるからです。 エクセル側でのVBAはShellExcute関数を使ってのアクセスファイル を開きたいということです。 ---- >ハイパーリンクをVBAでやりたいということです。 これはどのような意味なのでしょうか? 以下のことと同じでは? >エクセル側でのVBAはShellExcute関数を使ってのアクセスファイル >を開きたいということです。 新規にファイルを開くだけならshell関数やShellExcute関数ですよね? 何が分からないのですか? (INA) ---- ExcelVBAからAccessを起動する(または起動しているAccessのウィンドウをアクティブにする) Application.ActivateMicrosoftApp xlMicrosoftAccess こういうのもありますね。 (みやほりん) ---- INAさんのハイパーリンクを使ってみたいと思います。 また、INAさんみやほりんさんのいろいろな手法、勉 強したいと思います。大変ありがとうございました。 (こうろ)