- ベストアンサー
開いているＥＸＣＥＬファイルのパス
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
VBE画面での 標準モジュールに Function pathn() pathn = ActiveWorkbook.Path & "\" & ActiveWorkbook.Name End Function をはりつけ シートのどこでもセルに =pathn() と入れると C:\Documents and Settings\XXXX\My Documents\社員1.xls のようなのが出せます。
その他の回答 (1)
- bilingual
- ベストアンサー率31% (10/32)
EXCELのセルにフルパスを入力したいのなら，「=CELL("filename",A1)」という関数を利用すればできますよ。
関連するQ&A
- エクセルでパスを含んだファイル名
エクセルのヘッダー・フッター編集で ワードのように"パスを含んだファイル名"（またはシート名）を 自動？で挿入することはできるでしょうか。 例えば、Ｃドライブの「あ」と言うフォルダーに保存してある テスト.xlsの「い」と言うシート名をヘッダーに挿入したい 場合、 C:\あ\テスト.xls\い と言うようにです。 ご教授をお願いいたします。
- ベストアンサー
- オフィス系ソフト
- Excelのハイパーリンクで絶対パスが動作しない
こちらで同類の質問を見つけましたが解決に至っていなかったので質問させていただきます。 当方、Excel2000を使用しています。 サーバー上にある共有フォルダ（Jドライブ）の同じフォルダの中に「A.xls」とリンク参照先のファイル「B.xls」があります。 「A.xls」のセルに、「B.xls」を開くためのハイパーリンクを、絶対パス（J:\フォルダ名\B.xls）で指定しました。 しかし、「A.xls」を例えばローカルドライブ（Cドライブ）のデスクトップにコピーし、そちらを開いてハイパーリンクをクリックすると、Jドライブにある「B.xls」を開きたいのに、ハイパーリンクが相対パスに変わってしまって、デスクトップ上のB.xlsを探してしまうため「ファイルが見つかりません」と表示されてしまいます。 [ハイパーリンクの編集]で確認したところ、「ファイル名またはWebページ名」欄には絶対パス「J:\フォルダ名\B.xls」を指定したはずなのに「J:\フォルダ名\」の部分が消えてしまい、「B.xls」というファイル名しか残っていませんでした。 Microsoftサポート情報『JP418119：以前のバージョンでハイパーリンクが開けない』の原因欄に『参照元と参照先が同じドライブの場合、ファイルを保存した時点で相対パスに変更されます。』とあったので、システムの仕様なのかもしれませんが、同一フォルダ内にあるファイルでも絶対パスの情報を保持する方法はないでしょうか。 デスクトップにある「A.xls」でハイパーリンクを設定すれば、「B.xls」と別フォルダのためか絶対パスが保持されるのですが、「A.xls」は最終的には「B.xls」と同じフォルダ内に保存しておきたいので、いちいちコピーするのはなるべく避けたいため、同一フォルダ内でも絶対パスの指定を保持する方法を教えてください。
- ベストアンサー
- オフィス系ソフト
- 相対パスが使えない
EXCELのファイルを呼び出したいのですが，絶対パスで e:\vb6.0\book1.xls と指定するとファイルが開くのですが， 相対パスで .\book1.xls と指定するとファイルが開けません。 なぜでしょうか？ EXCELのファイルとｖｂのファイルは同じフォルダ内にあります．
- ベストアンサー
- Visual Basic
- .xlsファイルが存在するパスを表示させたい
エクセルマクロ初心者です。 .xlsファイルをサブフォルダも含め検索し、A列にファイル名、B列にファイルが存在するパスを表示させるにはどうしたらいいでしょうか？検索するベースのディレクトリは決まっている”C:\temp”のでtemp以下、.xlsがどこに存在するのかを検索するマクロを組もうとしています。 いろんな書き込みを探し、サブフォルダを含め、ファイル名を取得するものは発見できたので組み込んでみましたが、、パスの表示方法がわかりません。 cnt = 0 Call Sample3("C:\temp") Callでサブルーチンsample3に渡し、ファイル名を取得しています。 Dim cnt As Long Sub Sample3(Path As String) Dim buf As String, f As Object buf = Dir(Path & "\*.xls") Do While buf <> "" cnt = cnt + 1 Cells(cnt, 1) = buf buf = Dir() Loop With CreateObject("Scripting.FileSystemObject") For Each f In .GetFolder(Path).SubFolders Call Sample3(f.Path) Next f End With End Sub あとは、どのように書けばいいのでしょうか？ 宜しくお願い致します。
- ベストアンサー
- SE・インフラ・Webエンジニア
- EXcelのマクロで相対パスでファイルを開く
Excelでマクロを使って他のブックを開こうとしています。 同じフォルダ内のブックを開くには Workbooks.Open Filename:=ThisWorkbook.Path & "\ブック名.xls" で開く事が出来たのですが、一つ上の階層にあるブックを開きたいときはどのようなコマンドを使えば良いのでしょうか？？ お教え下さい。
- ベストアンサー
- その他MS Office製品
- EXCELファイル名に色をつけ識別できますか
ちょっと説明しにくいのですが、おわかりいただけるでしょうか。 会社のネットワークの共有フォルダーに、EXCEL等のファイルを保存していると、なぜかファイル名、あるファイルは普通に黒字で表示され、あるファイルは青時で表示されているのです。 例えば、フォルダー内を開け、３つのEXCELファイルが保存されていると考えてください。 ファイルA.ｘｌｓ 〔黒字で表示〕 ファイルB.ｘｌｓ 〔黒字で表示〕 ファイルC.ｘｌｓ 〔青字で表示〕 見たいな感じで、なぜかCだけが青時表示なのです。会社の誰に聞いてもわからず、また最近開けたファイルは青、とかの規則性もないようです。 こういう現象をご存知の方おられましたら、ご説明いただければ幸いです。もし、ファイル名に意図的に色をつけることができるなら、重要なファイルを色付けする等有効な活用法があると思うのです。 宜しくお願いいたします。
- ベストアンサー
- SE・インフラ・Webエンジニア
- IEで共有ファイルが開けない
いろいろググってみたのですが上手く見付けられなかったので質問させて下さい。 とあるフォルダを共有化しHTMLでメニューを作成しEXCELファイルを 公開しようとしたのですが、開けるものと開けないものがあり困っています。 状況としてはこんな感じです。 EXCELファイルを適当に１つ作成し、そのファイルをコピーして ２ファイルにしそれぞれファイル名を「月次.XLS」「予算.XLS」とする。 IEを開き「http://サーバー名/共有フォルダ/」のアドレスをたたき 共有フォルダの中身を表示。それぞれEXCELファイルをクリックすると 表示することに成功。 今度は「http://サーバーのIPアドレス/共有フォルダ/」のアドレスで 同様のことをすると「予算.XLS」だけが開けなくなるという状態です。 いろいろと切り分けをした結果、どうも「予」の漢字を使うと 開けなくなる感じです。これをどうにかして解決出来ないものでしょうか。 なおアドレスはIPアドレスを使う必要があるのでHOSTSファイル等の 解決策では対応は考えていません。 もし何かありましたらお知恵をお借り出来たらと思いますので よろしくお願い致します。
- 締切済み
- Windows XP
- EXCELのファイルが変に・・・
拡張子が.xlsというあるファイルをダブルクリックすると、excelを立ち上げて、ワークシートを閉じた状態と同じになります。 先にexcelを立ちあげて、そのファイルを開いても、 何となくファイルを開いたような感じになるのですが、結果として最初に出てくる白紙のワークシートのままです。 そのファイルのサイズは126KBです。 ファイルのプロパティーを見るとファイル名がちゃんと表示されます。 このファールはつい先日まで使っていたexcelのファイルだそうです。 壊れちゃったファイルですか？
- ベストアンサー
- オフィス系ソフト
- パスを使ってファイルを開く
ファイルダイアログでパス取得を行った後に、 そのパスを使ってファイルをコピーということは出来るでしょうか？ 行ってほしい動作としましては、 ・ファイルダイアログでパス取得 ・そのパスを使ってファイルをコピー としたいのです。 ちなみに、コピーするためのコードは Call Shell(Environ$("COMSPEC") & " /C COPY ""C:\AAA.xls"" Z:AAA.xls") といった、絶対パスによるコピーになっています。 何故、パス取得が必要かといいますと元ファイルの場所が変わることがあるからです。 どうしても分からないので方法あるようでしたら教えてください。
- 締切済み
- オフィス系ソフト
