フォルダ内文字列カウントソフト
Step 5 フォルダ内の全ファイルで出現数回数をカウントする
フォルダ内から検索した全ファイル内で、文字列を検索し、出現回数を表示します。Homeに戻る > Excelでアプリケーションソフト３ > フォルダ内文字列カウントソフト
実行画面
[検索フォルダ]ボタンをクリックし、表示されたファイル一覧の上から順に検索文字列を検索しカウントします。結果はファイル名右横のセルに表示します。
VBAコード
MyCountStartプロシージャを下記に変更してください。
'カウントの開始
Private Sub MyCountStart(lRow As Long, lCol As Long)
'フォルダ名が空白になるまでループする
Do While (Cells(lRow, lCol) <> "")
Cells(lRow, lCol + 2) = MyCountFile(Cells(lRow, lCol) & Cells(lRow, lCol + 1))
lRow = lRow + 1
Loop
End Sub
Private Sub MyCountStart(lRow As Long, lCol As Long)
'フォルダ名が空白になるまでループする
Do While (Cells(lRow, lCol) <> "")
Cells(lRow, lCol + 2) = MyCountFile(Cells(lRow, lCol) & Cells(lRow, lCol + 1))
lRow = lRow + 1
Loop
End Sub
Homeに戻る > Excelでアプリケーションソフト３ > フォルダ内文字列カウントソフト
■■■
このサイトの内容を利用して発生した、いかなる問題にも一切責任は負いませんのでご了承下さい
■■■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します
Copyright (c) Excel-Excel ! All rights reserved