外側の繰り返し　－１　減らしていく 列のデータ全部取得しループ開始の行の位置を下へしていく Sub test( […]

シート数取得 Sheets.Count 保存するシート名と比較 ～月分 同じ名前のシート名があれば If (M […]

B2が空白の場合エラーがでるので 空白を判定する Dim a a = Range(“B2&#822 […]

複数条件　 COUNTIFS C列　D列　両方とも1の個数 =COUNTIFS(C3:C10,1,D3:D10 […]

Sub test() Dim today As Date ActiveSheet.Name = Month(t […]