• ベストアンサー

初歩的なマクロ操作で挫折

shinyat1の回答

  • shinyat1
  • ベストアンサー率16% (1/6)
回答No.4

「毎回選択してエクセル上で開きたい」ということですから、 Application.Dialogs(xlDialogOpen).Show で良いのではないでしょうか? 「全てのファイル」を選ばないとテキストファイルは選択できませんが。

soynoby
質問者

補足

ありがとうございます。 デスクトップにある「特定のフォルダ」を指定する場合ということをお伝えし忘れました。 デスクトップ上の「○○」の中にある複数のテキストファイルを選択できるようにしたいです。 想像していた以上にむつかしいのですね。皆様に感謝します。

関連するQ&A

  • デスクトップ上にあるフォルダ内のファイルを選択して開くマクロ

    マクロを始めた初心者です。 エクセル上でデスクトップの「○○」というフォルダ内にある複数のテキストファイルを表示して、その都度選択して開きたいと思います。 この作業をマクロで行いたいのですがうまくいきません。 あまりにも単純なマクロのためか同じような症状の方が見当たらないので投稿しました。よろしくおねがいします。

  • エクセルマクロでご教示ください

    エクセルで作られたデータファイルに対し、ある操作を施して上書き保存するというマクロを作りました。 そのマクロを走らせるとファイル名を聞いてきまして、そこでファイル名を入力してやれば、ある操作を施したあと 自動的に上書き保存までしてくれるのですが、対象ファイルが複数個あると、ひとつ実行したあとまたひとつ ファイル名を入れて、またそれが終ったら次のファイル名を・・・というように、ひとつひとつ実行しなければならない というのが現状です。 これを次のように改良したいのですが、どうすればいいのでしょうか? 1.マクロを立ち上げる。 2.処理する複数のファイルが入っている「フォルダ」を選ぶ。  (一覧表示のウィンドウが出てきて、その中で「フォルダ」を選ぶ) 3.そのフォルダの中に入っているエクセルファイル全てに対し、既に作成済みのマクロを順次実行する。 というものです。 よろしくお願いします。

  • excelのマクロ操作

    excelで以下の操作をマクロを用いて繰り返し行いたいのですがどのようになプログラムにしたらいいでしょうか? テキストファイルをexcelで読み込む            ↓         グラフの作成            ↓           excelの保存

  • エクセルVBAでの呼出操作をマクロ化するには?

    エクセルVBAでの呼出操作をマクロ化するには? エクセル2000です。宜しくお願いします。 VBAで、ファイルを呼び出したいのですが、Workbooks.openの書き方が良く分かりません。 呼び出すファイル名は決まっていなくて、フォルダ名は固定です。 エクセルの操作で言うと、ファイルを開くを押して、フォルダを選ぶとこまでをマクロかしたいのですが。 例えば、ドライブDの「作業用」フォルダを開きたい場合は、どう記述すれば宜しいでしょうか? 基礎的な部分でお恥ずかしいのですが、以下で実行しても動かんのです。 ChDir "D:\作業用" Workbooks.OpenText Filename:= "D:\作業用\*.*"

  • Excelマクロで複数のファイルを開く方法

    Excel VBAでそのマクロを実行するファイルと同じフォルダにある 複数のテキストファイルを全て開いて、ある処理を実行して それを名前を変えた別のテキストファイル(元のテキストファイル名に 何らかの名前を追加する形が望ましいです。)として保存する マクロを作成したいのですが、可能でしょうか。 当方、初心者につき申し訳ございませんがよろしくお願い致します。

  • エクセルのマクロについてお尋ねします。

    エクセルのマクロについてお尋ねします。 あるフォルダの中のエクセルファイル名一覧を取得して、ユーザーがそれを複数選択し そのファイルを選択したものだけ複数自動取り込みたいのですが、ファイル一覧の取得はできそうなのですが、その先どうしたらいいでしょうか?

  • 2007マクロの初歩

    マクロを作って保存し再度開くと、「マクロが実行できません。このブックでマクロが実行できないか、すべてのマクロが無効になっています」との表示が出てきます。 また上部のバーには「セキュリティの警告」が表示され、オプションで「このコンテンツを有効にする」にするとマクロは使えますが、毎回この操作が必要なのでしょうか。 質問は、ブックを開いた時、こういう表示を出させずにマクロが使える方法を教えていただきたいということです。よろしくお願いします。

  • ExcelマクロでVBエディタの自動化は出来ない?

    Excelのマクロで、VBエディタの操作を自動化したいと考えていますが、出来ないのでしょうか? マクロの記録では VBエディタの操作は一切記録されないようです。 バージョンは Excel2003 です。 具体的には、全てのマクロのコードをテキストファイルに吐き出したいと考えています。 ファイルメニューのエクスポートでも、コードウィンドウ1つ1つを "全てを選択" でも、Excelのマクロから実行させることは出来ないのでしょうか? よろしくお願いします。

  • エクセル起動時、自動的にマクロを実行する

    エクセルファイルを開いたとき、自動的にマクロを 組み込む方法で、「XLSTARTフォルダ」にマクロファイル を置くという方法を最近知りました。 任意のエクセルファイルを開いたときのみ XLSTARTフォルダのマクロファイルを実行する 方法はないのでしょうか? 普通にエクセルを使いたいときでも、マクロが組み込まれて しまい、とても困っています。 例えば、指定のフォルダの中にあるエクセルファイルであれば XLSTARTフォルダのマクロファイルを実行する という、操作ができたりすれば、とてもよいのですが。 何か良い方法があれば、教えていただきたいです。

  • エクセルVBAでの呼出操作をマクロ化するには?

    エクセルVBAでの呼出操作をマクロ化するには? 【今年の7/16に以下の質問をしました】 エクセル2000です。宜しくお願いします。 VBAで、ファイルを呼び出したいのですが、Workbooks.openの書き方が良く分かりません。 呼び出すファイル名は決まっていなくて、フォルダ名は固定です。 エクセルの操作で言うと、ファイルを開くを押して、フォルダを選ぶとこまでをマクロかしたいのですが。 例えば、ドライブDの「作業用」フォルダを開きたい場合は、どう記述すれば宜しいでしょうか? 基礎的な部分でお恥ずかしいのですが、以下で実行しても動かんのです。 ChDir "D:\作業用" Workbooks.OpenText Filename:= "D:\作業用\*.*" 【watabe007 さんより以下の回答を頂きまして当時は上手く動いたつもりだったのですが、  添付画像の様にファイルの種類が「すべてのファイル(*.*)」しかありません。】 Dim strRet As String ChDrive "D:\作業用" ChDir "D:\作業用" strRet = Application.GetOpenFilename(Title:="ファイル名を選択して下さい") If strRet = "False" Then   MsgBox "キャンセルが選択されました。処理を中止します。", vbCritical   Exit Sub Else   Workbooks.Open Filename:=strRet End If End Sub 【今回の再質問】  当時ファイルの種類まで指定していなかったのですが、実際には、テキストデータを、カンマ区切り  で変換して呼び出したいので、ファイルの種類は、「テキストファイル」としたいのですが、  どうすれば宜しいでしょうか?  助けてください。  (上記のような事は無理なんでしょうか?無理なら無理のご回答がご投稿戴ければ諦めます;;)