2024-01-01から1ヶ月間の記事一覧
' データハンドリングユーティリティクラス Class DataHandlingUtility ' テキストファイルからデータを読み込む Public Function ReadTextFile(filePath As String) As String ' 以前のコードを含む End Function ' データをテキストファイルに書き込む Pub…
Sub aaa() Call ProcessExcelFiles("C:\Users\toufu\Desktop\4koma") End Sub Sub ProcessExcelFiles(folderPath As String) Dim fileSystemObject As Object Dim folder As Object Dim file As Object Dim excelApp As Object Dim Workbook As Workbook Dim…