Excel2007VBAで拡張子の無いファイルを開く際にファイルが認識されない問題について

このQ&Aのポイント
  • 業務仕様にて拡張子の無いファイル(テキストファイル)を使用してデータ更新を行うことになり、Excel2007VBAにてGetOpenFilenaを使用してファイルを開く際に「ファイルがみつかりません」というエラーが発生します。
  • 調査した結果、拡張子の無いファイル名の最後に「.」が付加されていることが原因で、ファイルが正しく開けないことがわかりました。
  • ファイル名の最後に「.」が付いている場合、Windowsではファイルとして認識されないため、問題が発生します。そのため、「.」が付いている場合は削除する必要があります。
回答を見る
  • ベストアンサー

Excel2007VBAGetOpenFilena

業務仕様にて拡張子の無いファイル(テキストファイル)を用いてデータ更新を 行うことになり、Excel2007VBAにてGetOpenFilenaを使用してファイルを開く ダイアログから「すべてのファイル(*.*)」で拡張子の無いファイルを選択し そのファイル名でファイルを開くと、「ファイルがみつかりません」とエラーになります。 何故、ファイルが認識されないか調べたところ、拡張子の無いファイル名の最後に "."ピリオドが付加されており、このためファイルが開けないところまではわかりました。 そこで質問なのですが、GetOpenFilenaを使い拡張子の無いファイル名を選択して も"."ピリオドが付かない方法はあるのでしょうか。 また、ファイル名の最後に"."ピリオドがあるファイルはWindowsはファイルとして認識 するのでしょうか。 認識しないのであれば無条件に最後が"."ピリオドの場合は"."ピリオドを削除して 対応できます。

質問者が選んだベストアンサー

  • ベストアンサー
回答No.1

再現した。 >認識しないのであれば無条件に最後が"."ピリオドの場合は"."ピリオドを削除して 対応できます。 それしかないんじゃないかなあ?MS自身そう言っているし http://support.microsoft.com/kb/161512/en-us/

jag01024
質問者

お礼

やはりそうでしたか。 納得しました。 ありがとうございます。

関連するQ&A

  • 任意Excel,TxtファイルをAccessへ取込

    ダイアログボックスにて取得したEXCEL2003ファイルおよびTextのインポート方法を教えていただけないでしょうか?ダイアログボックスからファイル名を取得するところ(テキストボックスにファイル名を代入するところまで)は、AccessClubのサンプルファイルで何とか紐解けましたが、この選択されたExcelファイルをAccessのテーブルとして(テーブル名=Excelファイル名)ファイルインポートするところがなかなか作れません。調べてもなかなか情報みつからずです。いまは、ファイル名とフォルダ場所を固定させることによって、マクロの”ワークシート変換”にて取り込んでおります(添付画像参照ください)。どうかアドバイスのほどよろしくお願い申し上げます。なお、Access2003です。

  • Excel2000と2010で処理を同じにしたい

    初めて投稿する kobutori_2011 です。 サンプルファイル等を参考に、EXCEL2000のVBAを使って、ファイルの更新処理を行っていました。 更新後のファイル書込み処理がExcel2000 と Excel2010で変わってしまい困っています。 Excel2000のVBAではファイル書込み処理として、下記の記述を使用していました。 ActiveWorkbook.Close SaveChanges:=True EXCEL2000では、この処理を実行する際、何事もなく(裏で上書き)処理されていたのですが、 EXCEL2010では、ダイアログボックスが表示され、 コピーファイルを作成するように表示されるようになりました。 色々、試行錯誤して、下記のようにプログラムを書換えたところ、ダイアログボックスが表示され、 上書き保存[OK]で同一ファイルが更新されるようになりました。 If gReadOnly = True Then ActiveWorkbook.Close SaveChanges:=False Else ActiveWorkbook.Close SaveChanges:=True, FileName:=gReadFile End If ダイアログボックスを表示させずに、EXCEL2000のように上書き保存させる方法を ご存知の方がいらっしゃいましたら、教えてください。 もしかすると、プログラム自体の問題ではなくセキュリティ設定の違いとか、 的はずれの修正を行っているかもしれませんが、宜しくお願いします。 以上

  • excel2016でエクスプローラーからの開き方

    windows8.1から10にアップグレードすると同時に、excel2016をインストールしました。 この状態で、エクスプローラーから前のバージョンの(excel2003や2007、2010など)のexcelファイルを開こうとしてファイル名をダブルクリックすると、なぜか[名前を付けて保存]のダイアログが表示されて、ファイルを開くことができません。 excelの[開く]メニューからファイル名を指定して開くことは問題なくできています。 2016について、何か仕様変更等があったのでしょうか、もしくはwindows10へのアップグレードがなにかしら影響しているのでしょうか。(キーボードの設定が変わったり、マウスの挙動が変わったりと、結構影響が出ています) ご存知の方いらっしゃいましたらよろしくお願いいたします。

  • excel2002のヘッダについて

    excel2002を使用しています。 ファイル名をシートのヘッダに付けているのですが、ファイル名の拡張子がヘッダには不要なので削除したいのですが、どのようにしたら拡張子をはずすことができるでしょうか?  よろしくお願いします。

  • EXCEL/VBAでWORDファイル名の先頭に文字を付加して保存する方法

    EXCEL/VBAでWORDファイル名の先頭に文字を付加して保存する方法を教えてください。 編集してファイルを保存するときに、元のファイル名の先頭に任意の文字(変数:f_kenmei)を付加して保存したいと思います。 EXCELファイルの場合は、 ActiveWorkbook.SaveAs Filename:=f_kenmei & ActiveWorkbook.Name で良いと思いますが、WORDファイルの場合はどうしたら良いですか。 EXCEL/VBA初心者につき、宜しくお願いします。

  • VBA(Excel2007からExcel2003の注意事項)

    Excel2003のマクロが起動しません。 Excel2007で新しいマクロの記録(自動)を行ったExcelファイルがあります。それを別のPCのExcel2003で実行すると、エラーが発生し、プログラムが停止します。 (両方のファイルの拡張子は***.Xlsです。) VBAでExcel2003から2007にバージョンアップでは問題ないようですが、2007から2003にバージョンダウンするうえで注意事項があれば、教えて下さい。よろしくお願いします。

  • リンクされたファイル(EXCEL)が開けない

    ブラウザ(イントラ)上に表示されたEXCELファイル(リンク)をクリックすると、「開く」か「保存する」の選択画面の後「開く」を選択しても開かないPCがあります。 ※開こうとしているダイアログでは、ファイル名が化けているように思えます。 機種やOSやEXCELのバージョンもまちまちで、原因を特定できない状況で困ってます。 対処方法をご存知の方、宜しくお願いします。

  • Excel97のVBAでコモンダイアログを使いたい

    現在Excel97で二つのテキストデータベース(固定長形式)を読み込み、解析を行おうとしています。 現在、べたに二つのファイルのパスをコードに書き込めばファイルの読み込みも上手くいくのですが、やはりここは出来るならばファイル指定を汎用のダイアログで行えるようにしたいと思いあれこれ方法を探しています。 そこで読み込みたい二つのファイルのパスを、VBで利用できるCommonDialogで取得出来るなら、一からファイル選択用フォームを作成しなくても済むので楽になると思いついたのですが、Excel97のVBAでの転用がうまくいかなくて企画倒れの状態になっています。 参照設定でComCtrl32.OCXを読み込めればと思い試験してみたもののうまくいかず、次の方法が見つからずに途方に暮れています。 もしかしてVBAではコモンダイアログは利用できないのでしょうか?

  • VBAでエクセル保存方法

    Excel2003のVBAで保存処理を下記のように行います。  Book.SaveAs ("ファイル名") しかし問題があり、ファイルを開くとVBAで記入更新したシートが 表れず別のシートが最初に表示されます。 一番最後に更新したシートを開いたときに表示される方法は ありますか? よろしくお願いいたします。

  • Excel2010文章が開けない

    Excel2010(拡張子は.xlsx)で作成た文章を数日後立ち上げて開こうとしたときに、次のようなメッセージが出て開けません。 「C:\Users\NEC-USER\Desktop\○○.xlsx-は有効なwin32アプリケーションではありません。」 新規のExcel2010からファイルを開く→対象フォルダー→(選択)から開けます。 保存時の拡張子はExcelブック(*.xlsx)です。 修復する方法を教えてください。

専門家に質問してみよう