ダイアログで指定したフォルダ内のファイル名を出力

お疲れ様です！キノコです！ ダイアログで指定したフォルダ内のファイル名を所得し すべて出力します。 *************************** ■ VBAコード ***************************Sub 指定したフォルダ内のファイルを取得() Dim dlg As FileDialog Dim SelectDir As String Dim Fname As String Dim Fcnt As Long 'フォルダを選択します。 Set dlg = Application.FileDialog(msoFileDialogFolderPicker) 'キャンセルボタンクリック時にマクロを終了 If dlg.Show = False Then Exit Sub 'フォルダーパスを取得 SelectDir = dlg.SelectedItems(1) 'このフォ

[gonai]

2023年1月現在のOffice365で使用可能