[[20210921134703]] 『特定フォルダ内に保管されているファイル名を抽出』(ブラウン) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『特定フォルダ内に保管されているファイル名を抽出する方法』(ブラウン)

はじめて質問させていただきます。
伝票の保管状況をEXCELを用いて行いたいと考えています。

第1階層に「伝票保管フォルダ」があります。
担当者は売り上げが上が発生した際に、第1階層フォルダに第2階層として「契約番号」を名前としたフォルダを作成し、そのフォルダの中に「注文書_XXXX.pdf」、「請求書_XXXX.pdf」のファイルを保管していきます。
保管作業はこれらの繰り返しとなります。

ここからがEXCELで行いたいことになります。
1. 翌月初めに、別のシステムから前月売り上げがあった契約番号を抽出して、シート1のA列に貼り付けます(毎月100件ぐらいあります)。
2. このA列に貼り付けた契約番号をもとに、同名フォルダに保管されている「注文書_XXXX.pdf」、「請求書_XXXX.pdf」の有無を確認し、シート2のA列に契約番号、B列に「注文書_XXXX.pdf」、C列に「請求書_XXXX.pdf」をVBAを使って表示させたいのです。
これをチェックシートとして活用し、売り上げ証跡の保管漏れを早期に発見したいと考えています。
1のシート1のA列に契約番号を記載するのは今回の質問対象ではありません。
あくまでも、2の段落事項が質問事項となります。
なにぶんVBAについて不慣れなもので、考え方を含めてそのようなコードを記載すればよいかご教示いただけると助かります。
よろしくお願いします。

< 使用 Excel:Excel2019、使用 OS:Windows10 >


 Cells(i,"B").Value = Dir("第1階層フォルダ\" & Cells(i,"A").Value & "\注文書*.PDF")
 とか、そんな感じでしょうか
(´・ω・`) 2021/09/21(火) 15:02

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.