[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『特定フォルダ内に保管されているファイル名を抽出する方法』(ブラウン)
はじめて質問させていただきます。
伝票の保管状況を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.