メインコンテンツへスキップ

フォルダの画像名/ファイル名をExcelセルにすばやく一覧表示するにはどうすればよいですか?

このチュートリアルでは、スクリーンショットに示すように、Excelシートの特定のフォルダーのすべての画像名またはファイル名をすばやく一覧表示するためのいくつかのトリックを提供します。

クイックナビゲーション

VBAを使用してExcelでフォルダの画像名を一覧表示します
ファイル名リストを使用して、Excelのフォルダの画像名または特定の形式のファイル名を一覧表示します
サンプルファイルをダウンロードする

ドキュメントリスト画像名1

VBAを使用してExcelでフォルダの画像名を一覧表示します

Excelには、選択したフォルダのすべての画像名をシートのセルに自動的に一覧表示できる組み込み関数はありませんが、このジョブをすばやく解決するのに役立つVBAコードがあります。

1. Excelで、を押します + 開くキー アプリケーション向け Microsoft Visual Basic 窓。

2.ポップウィンドウで、をクリックします インセット > モジュール 新しいモジュールスクリプトを作成します。

3.以下のコードをコピーして、新しいモジュールスクリプトウィンドウに貼り付けます。

Sub PictureNametoExcel()
'UpdatebyExtendoffice 
    Dim I As Long
    Dim xRg As Range
    Dim xAddress As String
    Dim xFileName As String
    Dim xFileDlg As FileDialog
    Dim xFileDlgItem As Variant
    On Error Resume Next
    xAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Select a cell to place name list:", "Kutools For Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    Set xRg = xRg(1)
    xRg.Value = "Picture Name"
    With xRg.Font
    .Name = "Arial"
    .FontStyle = "Bold"
    .Size = 10
    End With
    xRg.EntireColumn.AutoFit
    Set xFileDlg = Application.FileDialog(msoFileDialogFolderPicker)
    I = 1
    If xFileDlg.Show = -1 Then
        xFileDlgItem = xFileDlg.SelectedItems.Item(1)
        xFileName = Dir(xFileDlgItem & "\")
        Do While xFileName <> ""
            If InStr(1, xFileName, ".jpg") + InStr(1, xFileName, ".png") + InStr(1, xFileName, ".img") + InStr(1, xFileName, ".ioc") + InStr(1, xFileName, ".bmp") > 0 Then
                xRg.Offset(I).Value = xFileDlgItem & "\" & xFileName
                I = I + 1
            End If
            xFileName = Dir
        Loop
    End If
    Application.ScreenUpdating = True
End Sub

4。 押す F5 キーを押すと、画像名を配置するセルを選択するためのダイアログが表示されます。
ドキュメントリスト画像名1

5。 クリック OK [参照]ダイアログで画像名を一覧表示するフォルダを引き続き選択します。
ドキュメントリスト画像名3

6。 クリック OK、これで、選択したフォルダ内のすべての画像名がExcelに一覧表示されました。
ドキュメントリスト画像名13

注: VBAコードでは、コード文字列でjpg / png /…を使用できます。 InStr(1、xFileName、 ".jpg")+ InStr(1、xFileName、 ".png")+ InStr(1、xFileName、 ".img")+ InStr(1、xFileName、 ".ioc")+ InStrの場合(1、xFileName、 "。bmp") > 0次に 必要なファイル拡張子に変更します。たとえば、ファイルのファイル名をドキュメント形式で一覧表示する場合は、コード文字列を次のように変更するだけです。 InStr(1、xFileName、 ".doc")> 0の場合。

通常、日常業務でExcelセル内のフォルダーのXNUMXつまたはすべての形式のファイル名をリストする必要がある場合、コードは複雑で扱いが簡単ではありませんが、以下の方法で、このジョブをすばやく解決できます。


移動する

あなたは昇給と家族と一緒に多くの時間を過ごしたいですか?

Officeタブは、現在作業中のMicrosoft Officeで効率を50%向上させます

信じられないほど、XNUMXつ以上のドキュメントで作業する方が、XNUMXつで作業するよりも簡単で高速です。

よく知られているブラウザと比較して、Officeタブのタブ付きツールはより強力で効率的です。

毎日何百ものマウスクリックとキーボード入力を減らして、今すぐマウスの手に別れを告げましょう。

通常、複数のドキュメントで作業する場合は、Officeタブを使用すると時間を大幅に節約できます。

30・XNUMX日無料お試し、クレジットカードは必要ありません。

続きを読む今すぐダウンロード


ファイル名リストを使用して、Excelのフォルダの画像名または特定の形式のファイル名を一覧表示します

ここにユーティリティがあります– ファイル名リスト in Kutools for Excel、そのことができます

>>新しいシートのフォルダのすべてのファイル形式ですべてのファイル名を一覧表示します。

>> Excelに指定したXNUMXつまたは複数のファイル形式でファイル名を一覧表示します。

>>サブフォルダや隠しファイルとフォルダを含むファイル名をExcelに一覧表示します。

今すぐマウスの手と頸椎症に別れを告げる

Kutools for Excelソルブの300の高度なツール 80% 数秒で Excel タスクを実行し、何千ものマウス クリックから解放されます。

1500 の作業シナリオに簡単に対処できるため、ソリューションの検索に時間を無駄にする必要がなく、人生を楽しむために十分な時間を確保できます。

毎日 80 人以上の非常に有能な従業員 (もちろんあなたも含む) の生産性が 110000% 向上します。

痛みを伴うフォーミュラやVBAに悩まされることはもうありません。脳を休ませ、楽しい働きをしてください。

フル機能を備えた 30 日間の無料トライアル、理由のない 30 日間の返金。

より良い体はより良い生活を創造します。

Kutools for Excelを無料でインストールした後、次のようにしてください。

1.ファイル名を一覧表示するブックを有効にして、[ クツールズプラス > 輸出入 > ファイル名リスト.
ドキュメントリスト画像名4

2。 の中に ファイル名リスト ダイアログ、まず、をクリックします  ドキュメントリスト画像名5 ファイル名を一覧表示するフォルダを選択するには、のチェックボックスをオンにします サブディレクトリにファイルを含める > 隠しファイルと隠しフォルダーを含める 必要に応じて
ドキュメントリスト画像名6

3.次に、名前をリストするファイル形式を選択します ファイルタイプ のセクションから無料でダウンロードできます。

チェック すべてのファイル オプションを選択すると、選択したフォルダ内のすべてのファイル形式のすべてのファイル名が一覧表示されます
ドキュメントリスト画像名7
チェック コマンドと オプションを選択し、ドロップダウンリストからファイル名を一覧表示する特定のファイル形式を選択すると、ドロップダウンリストで選択したファイル形式のすべてのファイル名が一覧表示されます。
ドキュメントリスト画像名8
チェック 指定 オプションを選択し、テキストボックスにファイル名を一覧表示するファイル拡張子を(コンマを使用して区切って)入力すると、Excelで入力したファイル拡張子のファイル名のみが一覧表示されます。
ドキュメントリスト画像名9

4.のドロップダウンリストから必要に応じてサイズ単位を選択します ファイルサイズ単位 セクション、ファイル名へのリンクを作成する場合は、チェックしてください ハイパーリンクを作成する オプションを選択します。

ドキュメントリスト画像名10 ドキュメントリスト画像名11

5。 クリック Ok、ファイル名といくつかのファイル情報を一覧表示する新しいシートが作成されます。
ドキュメントリスト画像名12

ヒント: すべてのシート名をExcelで一覧表示する場合は、Kutools forExcelを適用できます。 シート名のリストを作成する ユーティリティを使用すると、リンク可能なすべてのシート名を一覧表示する新しいシートが作成されます。
シート名リストを作成する

Kutools for Excel:+便利な便利なツール。Excelの複雑なタスクを数回クリックするだけで簡単に行えます。


サンプルファイルのダウンロード

サンプル


群衆からあなたを際立たせ、簡単に仕事をし、のんびりと人生を楽しむ方法は?

Excel 用 Kutools は、毎日平均 80% の効率を向上させ、家族と一緒に過ごす時間を多く持ち、人生を楽しむことができます。

300 の高度なツールが解決します 80% Excel の問題では、解決策を探すのに苦労することがなくなり、より簡単に作業を完了できます。

1500 の Excel シナリオを簡単に処理できるため、毎日少なくとも 1 時間を節約できます。

5分でExcelのエキスパートになり、人々の認知と昇進の機会を手に入れましょう。

ワンクリックユーティリティはバッチ処理を処理し、マウスの手に別れを告げるなど、何千ものマウスクリックを回避できます。

暗記式や複雑なVBAを取り除き、脳を休ませてください。

110000人以上の高効率役員と300人以上の世界的に有名な企業の選択。

39ドルしかかかりませんが、他の人の4000ドルのトレーニングよりもはるかに価値があります

制限なしの 30 日間の無料トライアル、理由を問わず 30 日間以内に全額返金されます。

今、あなたのより良い生活を勝ち取りました 続きを読む 無料の30-Dayトライアル 今すぐ購入

推奨される生産性ツール

Officeタブ-MicrosoftOffice2019-2003およびOffice365でのドキュメントのタブブラウジング、編集、管理


オフィスタブ

Excel 2019-2007を高速化するためのプロフェッショナルアドイン、時間タスクを秒に短縮

このアドインには数十の専門家グループが含まれており、300以上のオプションにより、Excelでの日常のタスクのほとんどが自動化され、生産性が少なくとも50%向上します。 ワンクリックオプトンのグループやバッチ変換など。
今こそ、Kutools forExcelでスピードアップするチャンスです!


Comments (10)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hey! This is super quick and thanks
This comment was minimized by the moderator on the site
Thanks so much for this!
This comment was minimized by the moderator on the site
In Libreoffice Calc I use the function of importing a list of files into the rows / columns of a Calc table, via Macro and based on certain criteria - I have created a button on the toolbar for this particular macro, and after pressing it, I select a folder, and the list of images is immediately inserted into a new document. How to make it as easy as possible in Excel? I have a lot of folders that contain 1 or more images and I need to:
> If the folder contains 1 image, I need it to be on a new line in Excel.
> If the folder contains more images, the first being on a new line and the second either:
- next to the first in the same row (in one column), separated by the character | (example: photo 1.jpeg | photo 2.jpeg)
- or to have their names in the columns (even without the | character) (the first option would be better, but the second is enough as well)

These are the product images whose names I need for import into Woocommerce - via a csv file.
This comment was minimized by the moderator on the site
Amazing! Thank you for sharing!
This comment was minimized by the moderator on the site
Hi,
As per the above code I am getting the the images name in an incrementing order, however the path where the images are being placed are in numeric incrementation.

Kindly suggest how I can keep the same formatting.
This comment was minimized by the moderator on the site
How to export an image with specific file name in excel.
This comment was minimized by the moderator on the site
I WAS HAVING THE SAME PROBLEM TANNER, IN THE SCRIPT WHERE IT HAS THE DIFFERENT FILE EXTENSIONS ITS GOING TO GRAB,YOU HAVE TO CAPITALIZE THE FILE EXTENSION ITS LOOKING FOR, FOR EXAMPLE, YOU SAID YOUR FILES ARE ".png", WELL IF YOU CAPITALIZE IT I.E ".PNG" IT MAY WORK.
This comment was minimized by the moderator on the site
Now it works for me. Thanks!!!
This comment was minimized by the moderator on the site
Is it possible that there is something wrong with the code? The file explorer is showing my folder full of images (.png) as empty.
This comment was minimized by the moderator on the site
Is it possible something is wrong with the code? Because it shows folders full of images (.png) as empty when it pulls up the box to select the photos.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations