- ベストアンサー
エクセル VBAでcuurent holderを取得するには
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
MsgBox CurDir MsgBox ThisWorkbook.Path MsgBox Application.Path http://t_shun.at.infoseek.co.jp/My_Page/Excel-VBA/vba_page1.htm
その他の回答 (1)
- prairie-gentian
- ベストアンサー率30% (39/128)
=ThisWorkbook.Path じゃないでしょうか？超・初心者なので間違いかも知れませんが・・・。
お礼
ありがとうございました ズバリできました
関連するQ&A
- VBAのパスの取得について
excelでマクロをVBAで組み、excelが現在置かれているところのパスを取得したのですが たとえばCのaaというファイルのbbところにおいて実行すると変数aに C:\aa\bb を取得することができました。 このパスの最後に\をつけて C:\aa\bb\ にしたいのですがどの書けば変数aに\を追加できるのでしょうか？
- ベストアンサー
- Visual Basic
- VBAでコンピューター名を取得したい
こんにちは Office2000使ってます ExcelやAccessのVBAで作業しているコンピューター名を 取得し 変数に入れたいのですがどうすればできますか？ ご存知の方教えてください VBA初心者です よろしくお願いします
- ベストアンサー
- その他（ビジネス・キャリア）
- エクセル2003で作ったVBAが2007で動かない
現在、エクセル2003で作成したVBAがエクセル2007だと、マクロを有効にして起動させようとするとコンパイルエラーとなって動作しない現象が起きていて困っています。 どなたか、解決方法をご教授頂けないでしょうか？ ・VBAを含んだファイルを開いて、マクロを有効にすると ”コンパイルエラー：変数が定義されていません” というエラーボックスが出てきてプログラムの矢印のポイントがPrivate Sub User Form_Initialize() のところを指したまま止まってしまう。 ・このVBAはエクセルの表の書かれたデータをRS-232Cで出力するようなプログラムが使われていて、MSCommというものが使われています。この関連のプログラムが2003と2007では互換がないということはありますでしょうか？ どうぞ、よろしくお願い致します。
- ベストアンサー
- Visual Basic
- 【VBAでapp.path が取得できない】
VBAでapp.path を取得しようとすると、「オブジェクトが必要です」エラーが表示されます。 アプリケーション実行パスを取得する方法はありますか？ Excel2000を使用しています。 宜しくお願いいたします。
- ベストアンサー
- Visual Basic
- エクセルのフルパスをｖｂａで取得
当方エクセル２００３で、 エクセルのフルパスは C:\Program Files\Microsoft Office\OFFICE11\ EXCEL.EXE です。 それをVBAで取得するにはどうすればいいですか？ Sub サンプル() Debug.Print 'オフィスがインストールされているフォルダのパスの取得 End Sub のようにして、 C:\Program Files\Microsoft Office\OFFICE11\ EXCEL.EXE を返したいです。 VBAコードをご教示ください。
- ベストアンサー
- オフィス系ソフト
- エクセル フォーム上の全てのコントロールを取得した
エクセル フォーム上の全てのコントロールを取得したい http://okwave.jp/qa/q4879853.html のNo.１さんの回答を参考に、 Sub try() Dim i As Integer Dim StrFormName As String StrFormName = "フォーム１" For i = 0 To Forms(StrFormName).Controls.Count - 1 Debug.Print Forms(StrFormName).Controls.Item(i).Name Next End Sub を作ったのですが、 「Forms」の部分が、 「Sub、Function、または Property が定義されていません。(Error 35)」 というコンパイルエラーになってしまいます。 上記のコードをアクセスＶＢＡにつけると、全てのコントロール名が取得できます。 同じようにエクセルで使うにはどこを修正すればいいでしょうか？ フォーム名は、変数に入れて使いたいです。
- ベストアンサー
- Visual Basic
- VBAのパス取得について
VBAで実行した場所の、下記のパスを取得し C:\aa\bb aaの部分だけを取り出し変数に代入したいです。 どのようにすればaaの部分だけ取得できるでしょうか？
- ベストアンサー
- Visual Basic
- VBA エクセル2003だと出るエラー
VBAはじめたばかりですが、宜しくお願いいたします。 エクセル2000ではエラーがでませんが、2003の場合次のようなエラーがでます。 実行時エラー1004 アプリケーション定義またはオブジェクト定義エラーです 「デバック」を押して、コードをみますと、次の行に黄色いマーカーがつきます。 Sheets("TXT").SaveAs FileFormat:=xlCurrentPlatformText, Filename:=ThisWorkbook.Path & "\今月.txt" マウスオーバーすると、次の２つが表示されます。 xlCurrentPlatformText= -4158 ThisWorkbook.Path ="C:\Document&【現在このファイルがあるパス】" 解決方法はありますでしょうか。 ご存知の方、いらっしゃいましたら、なにとぞ宜しくお願いいたします。 このマクロの実行目的は、あるエクセルファイルを加工して、最終的にテキストファイルを生成することです。 テキストファイルをつくったあと、保存するタイミングでエラーがおきるようです。
- ベストアンサー
- オフィス系ソフト
- ExcelをVBAで読み込むと
ExcelデータをAccess VBAを使い、読み込んでテーブルに溜め込んでいます。 問題が１つあり、Excelのデータは他のシステムによって自動で作られています。 このExcelデータは１行目に見出しがあります。この見出しの列が時々追加されたり、削除さたりします。 例えば、下記の２列があるとします。読み込みたいのはID,NAMEのみです。 ID,NAME この２列が固定であれば、問題ありません。しかし、時々、 ID,SEIBETU,NAME と、SEIBETUという項目が追加されたりします。そうすると、Access VBAで読み取ろうとするとエラーが出ます（プログラムの修正をすればいいのですが）。 こういった問題を解決するには、何かいい方法はあるでしょうか？Accessでやっていますが、VB.NET、SQL Serverで解決できるなら、そちらを勉強して解決したいと思います。 よろしくお願いします。
- ベストアンサー
- その他(データベース)
- Excel VBAで全シート名を取得する方法ありますか？
Excel VBAで全シートの名前を 取得して変数に保存する方法は、ありますか？ あったらで良いので 教えてください。 よろしくお願いします。
- ベストアンサー
- Visual Basic
お礼
ありがとうございました