VBAでディレクトリに格納されているファイル一覧を取得する方法(DIRだと名前が切れる)

特定のフォルダに格納されているファイルを一覧で書き出し(セルに列挙)名前の昇順でソートして処理を行おうと思っています。
DIRを使用する方法を考えたのですが、ファイル名が長いので、途中で切れてABCDEFGHIJK.xlsxがABCDEFG.xlsxのようになってしまいます。
NET USEでも同じような現象に遭遇したことがあり、VBSで対応しましたが、DIRの場合はどのような対応をすれば良いのでしょうか?

回答の条件
  • 1人5回まで
  • 登録:
  • 終了:2018/11/05 11:25:05
id:keijun5145

名前が切れるならもっと短い名前にしろよという指摘は処理上の制約があるため、できません。

回答0件)

回答はまだありません

  • id:degucho
    ABCDEFG.xlsxではなく
    ABCDEF~1.xlsxとかになっていませんか?
    APIで元ファイルを取得するか、
    VBS同様にFSOを使うかになるようです
    https://knjname.hateblo.jp/entry/2015/01/27/220219
  • id:Silvanus
    自分の手許のExcel(365)では、DIRでちゃんとロングファイルネームが返されて来るのですが…。
    EXCELはどのバージョンですか?
  • id:keijun5145
    2013を使用しています。
    OSが64bitですが、64bitのEXCELは不具合があるので、WOW64で動作している状況です。
  • id:Silvanus
    どうもdeguchoさんが御指摘の通りFSOで何とかせざるを得ない様ですね…。
    手許に2013がありませんので自分で試すことができませんが
    下記のページ掲載のプログラムから不要な処理(セル罫線の設定等)を
    取り除けば宜しいのではないでしょうか。
    https://excel-ubara.com/excelvba6/EXCELVBA110.html

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

回答リクエストを送信したユーザーはいません