Option Explicit ' タスクシート設定 Const lng開始行 As Long = 3 Dim var全体開始日 As Variant ' 全体の開始日 Const txt全体開始日アドレス As String = "B1" ' シート名 Const cnst休日シート名 As String = "休日" Const cnst担当者シート名 As String…

Excelで文字列検索するマクロ Option Explicit ' --------------------------------------------------------------------------------------------------------------------- ' 定数 ' ------------------------------------------------------------------…