- ベストアンサー
VBAでファイル選択窓の初期パス設定??
VBAでファイル選択窓の初期パス設定?? アクセス(V2010) VBAで、SelectFileDialog を使って ファイル選択窓を表示します。 開いたとき、所定のPathのファイルを表示したいと思い、 事前に CdDrive と CdDir で、カレントパスを 移動する指定をしているのですが、うまくいきません。 うまくいかせる方法をご教示ください。 手元では、指定した Path でなく、 直前の実行で選択したファイルの Path になってしまいます。 よろしくお願いいたします。
- みんなの回答 (2)
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (1)
- 1050 円(@1050YEN)
- ベストアンサー率69% (477/687)
関連するQ&A
- エクセルVBA実行時のエラー:DLLファイルが見つ
タイトル:エクセルVBA実行時のエラー:DLLファイルが見つかりません 質問させていただきます。どうぞよろしくお願いいたします。 環境:PC1~3の全てが、Excel2010、Win7になります。 初めてVBAから読み込むためのDLLファイルを作成いたしました。 PC1上で動作確認できている2つのファイル(Test4.dll(VC++2013にて作成)と それを呼び出すVBAのついたエクセルファイル)を、 PC2とPC3に移動し、VBAを実行しましたところ 何故かPC3でのみ下記エラーが発生いたします。 >実行時エラー'53' >ファイルが見つかりません。Test4.dll ・2つのファイルは同じフォルダ内で実行しております。 ・VBAのカレントパスは ChDrive Left(ThisWorkbook.Path, 1) ChDir ThisWorkbook.Path で変更しております。 試しにC:\Windows\System32と C:\Windows\SysWow64にも Test4.dllをコピペしてみましたが、同じエラーが出てまいります。 ・PC3のみ違うところを探してみましたが、思いつくのは下記くらいでございます。 1.VSが入っておりませんでした。(必要なのでしょうか??) 2.実行しているパスが違います。 PC1とPC2の実行パス: D:\Users\Administrator\Documents\VBA_TEST PC3の実行パス: D:\Documents\VBA_TEST もし何か原因として思いつかれる事がございましたらお教えいただけないでしょうか。 お詳しい方がいらっしゃいましたら何卒よろしくお願いいたします。
- ベストアンサー
- Visual Basic
- ファイルアップロード時のファイル選択画面の初期パスを設定しない
phpとjavascriptを使ってファイルをアップロードのフォームを 作っている初心者です。 ファイルアップロードフォームの参照ボタンを押して ファイル選択ダイアログを出した時に、初期パスを固定にしたいので、 方法があるのでしょうか?
- 締切済み
- PHP
- excel vbaで今開いたばかりのファイルのパスを取得したい
お世話になっております excelで「今開いたシート名までのパス」を取りたいのですが、方法がわかりません 現在 For FileNo = 1 To .FoundFiles.Count(あるフォルダの中にある) *************** For intNum = 1 To intSC(ファイルの中のシートを端から開いて作業する) *************** というようにfor nextであるファイルのあるシートを指定して作業するようになっています いったん、別のファイルを選択してからまたこの開いたシートに戻る必要があるため、この直前に開いたシートのパスが必要なのです 「ThisWorkbook.Path」などではコードが書いてあるファイルのパスになってしまいます どうか教えていただけると大変助かります 宜しくお願いします
- ベストアンサー
- その他(プログラミング・開発)
- 『ファイルの選択』の初期表示を設定する事は可能?
初歩的な質問で申し訳ないです。。。 WEB上からファイルをダウンロードしたり、EXCELやWORDでファイルを保存する時に、どこのフォルダへ保存するかの『ファイルの選択』画面が表示されます。 ここの初期表示ってどのような仕組みになっているのでしょうか? また、これを設定する事は可能なのでしょうか? 一度保存を行うと、次回の保存は前回の保存先のフォルダが表示されるようになっていますが、PCを起動させた時の最初の初期表示を指定出来たら便利なのに…と思ってます。
- ベストアンサー
- Windows NT・2000
- ファイル選択ダイアログからファイルのフルパスを取得したい
Visual Basic 2008について質問があります。 フォームにテキストボックスを配置し、そのテキストボックスに ファイル選択ダイアログで選択したファイルのパスを表示させたいのですが どのようにパスを取得し表示させるのでしょうか? 初歩的な質問で申し訳ありませんがどうぞよろしくお願いします。
- ベストアンサー
- Visual Basic
- WindowsのPATHの設定と有効性について
Windows10での環境変数のパス指定はコンパネ→システム→システムの詳細設定→環境変数と進んで環境変数PATHを編集して指定することができます。確認したのですが、確かにそうなっています。スペルミスも発見できません(昔と違って表のようになってます)。それを指定した後、パワーシェルでその新規に指定したパスでの実行ファイルを入力しても実行しません。実行ファイルが見つからないというメッセージです。 環境変数PATHがどうなっているか調べるためにコマンドプロンプト(パワーシェルじゃないもの)でPATHコマンドを入力してみると確かに指定されていません。指定したフォルダが入っていないのです。 設定しているのに、設定されていないようになっている理由が不明です。なせ有効にならないのだろうと思うのですが。例えばフォルダ名が.abcのように隠しファイルのようなドットが先頭に入っているとダメなのでしょうか。確かに設定されているのに、何かの理由で有効になっていない理由が知りたいのですが。そして有効化したいのです。よろしくお願いします。
- 締切済み
- Windows系OS
- そのファイルのパスって取得できますか?
ExcelでVBAを書いているんですが、たとえば、マイドキュメントとかのパスって、調べることが出来ますよね? そういった感じで、自身がどこにいるかも取得する方法ってあるのでしょうか? もちろん、ファイルを指定するようなダイアログを出せば出来るんですが、今回のは、そういったことじゃなくて、ユーザ側には何の操作もさせないことを考えています。 最終的にやりたいことは、同じディレクトリ内のファイルとの同期なんですが、やはり、ファイルの位置は、フルパスで指定しないとダメなんでしょうか。 どなたか、よろしくお願い致します。
- ベストアンサー
- Visual Basic
- VBAで「ファイルを開く」ダイアログボックスにパスは指定できますか?
エクセルVBAでプログラミングをしています。 「ファイルを開く」ダイアログボックスを開くときに、パスを指定して開くことは可能でしょうか? ご存じの方、教えてください。 エクセルは、Excel2000、Excel98などを使用しています。
- 締切済み
- オフィス系ソフト
- 【VBAでapp.path が取得できない】
VBAでapp.path を取得しようとすると、「オブジェクトが必要です」エラーが表示されます。 アプリケーション実行パスを取得する方法はありますか? Excel2000を使用しています。 宜しくお願いいたします。
- ベストアンサー
- Visual Basic
- VBAのパスの取得について
excelでマクロをVBAで組み、excelが現在置かれているところのパスを取得したのですが たとえばCのaaというファイルのbbところにおいて実行すると変数aに C:\aa\bb を取得することができました。 このパスの最後に\をつけて C:\aa\bb\ にしたいのですがどの書けば変数aに\を追加できるのでしょうか?
- ベストアンサー
- Visual Basic
- Mac bookを使用しているが、バージョンによって使えるものと使えないものがあるため、問題が発生している。
- 製品名MFC-J6973CDWの無線LAN接続に関するトラブルについて相談。
- 関連するソフト・アプリは特にないが、電話回線は不要。
お礼
layy さん、例1. の方法で解決しました。 lpstrInitialDir に、 所定のPathを設定することで、 できました。 このメンバー未設定で ChDir による移動が 優先されると勘違いしてました。 迅速、正確・簡明なご教示をいただき 大変たすかりました。 感謝いたします。 ありがとうございました。
補足
layy さん、ありがとうございます。 以下に補足します。 (1) 構造体変数 fOfn に、以下の内容をセットしています。 fOfn.lStructSize = Len(fOfn) fOfn.hwndOwner = GetActiveWindow() 'Win Handle fOfn.hInstance = 0 fOfn.lpstrFilter = fFilter ' txt.* fOfn.nFilterIndex = 1 fOfn.flags = OFN_PATHMUSTEXIST Or OFN_FILEMUSTEXIST Or OFN_HIDEREADONLY fOfn.lpstrTitle = "ファイルを開く" fOfn.nMaxFile = BUFF_SIZE ' 1024 fOfn.lpstrFileTitle = String(BUFF_SIZE, vbNullChar) fOfn.nMaxFileTitle = BUFF_SIZE '1024 fOfn.lpstrFile = String(BUFF_SIZE, vbNullChar) fOfn.lpstrDefExt = vbNullChar (2) ChDrive、ChDir を実行したのち CurDir で、カレントを 確認すると、確かに 指定した Pathに変化しています。 しかし GetOpenFileName では、直前の動作で、実際に 選択した Fileの Directory が表示されています。 よろしくお願いいたします。