エクセルをファイル名を指定して実行

質問

初めて質問します。よろしくお願いいたします。

早速ですが、Excelで、毎回決まったシートを開きたいと思っています。

そこで、「ファイル名を指定して実行」で、ExcelのBook(a)のSheet(b)を指定して開くことは可能でしょうか？

または、Excel自体で、マクロを使わずにそのような設定する方法はありませんでしょうか？
ちなみに不特定多数の人間が保存をするので、そのシートで保存するという方法は使えません。

初歩的質問で恐縮ですが、どなたかアドバイスお願いいたします。

回答No.4

noname#97729 · ベストアンサー

Option Explicit

Dim objExcel

'エクセルオブジェクトを作成します
Set objExcel = CreateObject("Excel.Application")

'エクセル画面を表示します
objExcel.Visible = True

'ワークブックを開きます パスとファイル名を入れてください
objExcel.Workbooks.Open "C:\Documents and Settings\*****\デスクトップ\Book1.xls"

'シート名を入れて下さい
objExcel.worksheets("aaa").select

'エクセルオブジェクトの破棄
Set objExcel = Nothing

------------------------------------------------------------------------
ＶＢＳです。

使い方
先頭の　Option Explicit　から　Set objExcel = Nothing　の最後までコピーして
メモ帳などに貼り付けて保存してください。（名前はなんでもいいです）
そして　拡張子を(.txt)から(.vbs)に変更します
アイコンの形がメモ帳からSの形をしたものに変わります。
Sの形をしたアイコンをダブルクリックでエクセルファイルが開きます。

パスとファイル名　そして　シート名を設定してください。

お礼

ありがとうございました！おかげさまで解決致しました！

回答No.3

gatyan

Excelのマクロを使わない場合は、VB Scriptを使うとできるみたい

↓をOpnXlsSht.VBSの名前で保存
set objargs = wscript.arguments
set objexcel=createobject("excel.application")
objexcel.application.visible=true
objexcel.workbooks.open(objargs(0))
objexcel.worksheets(objargs(1)).select

ショートカットで、 OpnXlsSht.VBS ファイルへのパス シート名 の様に入力します…ちょっと面倒です
VBSやXLSのパスは、絶対パス(ドライブ名から)で指定してください
エラーチェックは入れてないので、必ず正しいパスとシート名を指定しないと・・・
あと、ショートカットのアイコンがVBSのになるんで、付け替えなどが必要ですね

お礼

ありがとうございました！おかげさまで解決致しました！

回答No.2

noname#36559

こんばんは。エクセル初心者です。
検索してみたのですが、検索した中では、マクロを使わないと駄目みたいでした。

http://oshiete.nikkeibp.co.jp/qa2678297.html
http://kiyopon.sakura.ne.jp/situmon/kaitou/index09.htm

シート名のタブをクリックするのが面倒であれば、Ctrl＋PageUpやCtrl＋PageDownを使うとか、
その決まったシートへのハイパーリンクを別シート内に作るなどはどうでしょうか？

お礼

どうもありがとうございました！おかげさまで解決いたしました！

回答No.1

ryuujiok2205

そのファイルのショートカット作ってデスクトップに置いとくのがいちばん簡単です。ショートカットは右クリックで「ショートカットの作成」を選びます。

お礼

どうもありがとうございました！