Excel

Excel

ブックを開かずに対象ブックのシート名リストを配列で取得する関数

要・参照設定:Microsoft ActiveX Data Objects ライブラリFunction fncGetExcelWorksheetNames(strFilePath As String) As Variant Dim cn A...
Excel

文字列末尾の改行削除(「。」の場合を除く)

' 機能概要: 文字列の各行をチェックし、末尾が「。」でない場合に改行を除去' 引数:' strText - 処理する文字列' 戻り値:' String - 条件に基づいて改行が除去された文字列Function RemoveNewlineI...
Excel

文字列から空白行を削除

' 機能概要: 文字列から空白行を削除' 引数:' strText - 処理する文字列' 戻り値:' String - 空白行が削除された文字列Function RemoveBlankLines(strText As String) As ...
Excel

英語形式の日付文字列を日付型に変換

' 機能概要: 英語形式の日付文字列を日付型に変換' 引数:' strDateText - 変換する日付の文字列(例: "Wednesday, December 13, 2023 9:00 AM")' 戻り値:' Variant - 変換さ...
Excel

日付文字列から括弧(「(」と「)」)および括弧内の文字を除去するVBA関数

' 機能概要: 文字列から括弧と括弧内の文字を除去' 引数:' strText - 処理する文字列' 戻り値:' String - 括弧と括弧内の文字が除去された文字列Function RemoveParentheses(strText A...
Excel

指定された形式の日付文字列を「yyyy/mm/dd hh:nn」形式に変換する関数

' 機能概要: 「Wednesday, December 13, 2023 9:00」形式の日付文字列を「yyyy/mm/dd hh:nn」形式に変換' 引数:' strDate - 変換する日付文字列' 戻り値:' String - 変換...
Excel

特定のフォルダ(およびそのサブフォルダ)に存在する全てのファイル名とそのパスを取得し、テーブルAに格納する処理

Sub StoreFilesToTableA() Dim fso As FileSystemObject Dim folder As folder Dim file As file Dim db As DAO.Database Dim rs...
Excel

BookAのSheet1を新規ブックにコピー、フォントと配色を変更後に保存

' 機能概要: ワークブックAのSheet1を新規ブックにコピーし、フォントと配色を変更後、保存する' 引数: なし' 備考: 保存先のフォルダ、ワークブックAの名前、テーマファイルのパスは適宜変更Sub CopySheetAndForma...
Excel

ファイルコピー(リスト順に実行)

Sub CopyFilesToFolderB() ' 機能概要: Sheet1のA列にあるファイルのフルパスを読み取り、フォルダBにコピーする ' 引数: なし ' 備考: フォルダBのパスは適宜変更 Dim ws As Worksheet...
Excel

PDFファイル名取得-2

'--------------------------------------------------'機能概要:指定フォルダ(サブフォルダ含む)内の全PDFファイル名とフルパスを取得'---------------------------...