Excel で月ごとの稼働時間を計算するにはどうすればよいですか?
多くの組織では、従業員が1 日8 時間・週5 日という標準的な勤務スケジュールに従っています。給与計算、プロジェクト管理、人員配置のためには、月ごとの総稼働時間を正確に算出することが不可欠です。しかし、週末や祝日、さらには個々の異なる勤務スケジュールを考慮しながら、毎月の合計時間を手作業で集計するのはミスが起きやすく、非常に時間がかかります。Excel には、こうした計算を効率化・自動化し、業務の正確性と効率性を飛躍的に高めるための実用的なツールや手法が備わっています。
以下に、Excel で月ごとの稼働時間を計算するための、さまざまなデータ構造やニーズに対応した効果的な解決策をいくつかご紹介します。
VBA コード – 複数行の月ごとの稼働時間を自動的に計算する
数式を使用して月ごとの総稼働時間を計算する
Excel の数式関数を使えば、開始日と終了日、および1 日の所定労働時間が分かっていれば、月ごとの総稼働時間をシンプルかつ確実に計算できます。この方法は、毎日一定の勤務スケジュールが適用され、週末や必要に応じて祝日も考慮したい場合に最適です。以下の手順で設定できます。
1。結果を表示したい空白セルを選択し、次の数式を入力してください。
=NETWORKDAYS(A2,B2) *8 数式を入力したら、Enterキーを押してください。最初は結果が日付形式で表示されることがあります。以下のスクリーンショットをご確認ください。

2。数値(稼働時間)として表示するには、まず数式の結果が入力されたセルを選択します。次に、ホームタブの数値の書式ドロップダウンから標準を選択してください。すると、下図のようにセルに総稼働時間がシンプルな数値として表示されます。

ヒント:祝日を含む期間を正確に反映させるには、数式内に祝日の範囲を追加して、これらの日を除外できます。次のようにご使用ください。
=NETWORKDAYS(A2,B2, C2:C4) *8 ここで、A2は開始日、B2は終了日、C2:C4は除外したい祝日の一覧です。上記のとおり、セルの書式を標準に設定してください。

注:セル参照(A2、B2、C2:C4 など)は、実際のデータ位置に合わせて調整してください。この方法は、標準的な1 日の所定労働時間に最適です。パートタイム勤務や日々の労働時間が異なる場合は、数式を調整するか、以下のいずれかの代替方法をご利用ください。
数式のメリットは、一度設定すれば日付や祝日を変更した際に結果が自動的に更新されることです。ただし、複数の従業員やより複雑な勤怠記録を含むデータセットでは、以下に示す高度な解決策の方が便利かもしれません。
VBA コード – 複数行の月ごとの稼働時間を自動的に計算する
ワークシートに複数の従業員や複数行のデータがあり、それぞれ異なる期間や開始日・終了日が記録されている場合、行ごとに手動で数式を入力するのは非常に手間がかかります。VBA マクロを使えば、各行の稼働時間を一括で自動計算でき、作業時間の大幅な短縮と手作業ミスの削減を実現します。
この方法は、各行が従業員または個別の勤務期間を表し、開始日・終了日・必要に応じた祝日が列に記録されたテーブルに特に効果的です。以下のマクロはすべての行をループ処理し、各エントリーの稼働時間を自動で計算・入力します。
1。Visual Basic for Applicationsエディターを開くには、開発ツール > Visual Basicをクリックします。新しく開いたウィンドウで、挿入 > 標準モジュールをクリックし、コード領域に以下の VBA コードを貼り付けてください。
Sub CalculateMonthlyWorkingHours()
Dim ws As Worksheet
Dim lastRow As Long
Dim i As Long
Dim startCol As String, endCol As String, holidayCol As String, resultCol As String
Dim holidays As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set ws = Application.ActiveSheet
' Adjust these column letters as needed
startCol = "A" ' Start Date in Column A
endCol = "B" ' End Date in Column B
holidayCol = "C" ' Holiday list in Column C (optional; can be blank)
resultCol = "D" ' Results in Column D
lastRow = ws.Cells(ws.Rows.Count, startCol).End(xlUp).Row
For i = 2 To lastRow
If ws.Cells(i, startCol).Value <> "" And ws.Cells(i, endCol).Value <> "" Then
If ws.Cells(i, holidayCol).Value <> "" Then
holidays = Split(ws.Cells(i, holidayCol), ",")
ws.Cells(i, resultCol).Value = WorksheetFunction.NetworkDays(ws.Cells(i, startCol), ws.Cells(i, endCol), holidays) * 8
Else
ws.Cells(i, resultCol).Value = WorksheetFunction.NetworkDays(ws.Cells(i, startCol), ws.Cells(i, endCol)) * 8
End If
Else
ws.Cells(i, resultCol).Value = ""
End If
Next i
End Sub 注意事項と操作手順:
- 列の文字()startCol、endCol、holidayCol、resultCol)は、ワークシートのレイアウトに合わせて必要に応じて調整してください。
- holidayCol 列には、7/3/2025 、7/18/2025のようにカンマ区切りで日付を入力してください。不要な場合は、空白のままにしておいてかまいません。
- このマクロは、データがヘッダーの次の行(2 行目)から始まることを前提としています。
2。マクロを実行するには、
ボタンをクリックするか、モジュールが選択されている状態でF5キーを押してください。コードは自動的に各行の月ごとの総稼働時間を計算し、結果列に入力します。エラーが発生した場合は、データ参照と日付形式が正しいかをご確認ください。
この方法は、大規模な従業員リストや複数行にわたるタイムシートデータの計算を自動化するのに特に効果的で、一貫性を確保しながら記録漏れのリスクを軽減します。データ構造がより柔軟であったり、日々の勤怠ログを集計したい場合は、以下で説明するピボットテーブルの活用をご検討ください。
最高の Office 業務効率化ツール
| 🤖 | KUTOOLS AI アシスタント:次に基づいてデータ分析を革新します:インテリジェント実行 | コード生成| カスタム数式作成 | データ分析とチャート生成| 拡張機能呼び出し… |
| 人気の機能:検索・ハイライト、または重複をマーキング | 空白行を削除する | データを失うことなく列の結合またはセルを | 数式を使用しない四捨五入... | |
| スーパー LOOKUP:複数条件 VLookup | 複数値 VLookup | 複数シート間 VLookup | ファジーマッチ.... | |
| 高度なドロップダウンリスト:ドロップダウンリストをすばやく作成 | 連動型ドロップダウンリスト | 複数選択可能なドロップダウンリスト.... | |
| 列マネージャー:指定した数の列を追加|列の移動|非表示列の表示状態を切り替え|範囲および列の比較... | |
| 注目の機能:グリッドフォーカス | デザインビュー |強化された数式バー | ワークブックとシートマネージャー | リソースライブラリ(オートテキスト)| 日付ピッカー | ワークシートの統合 | 暗号化/セルの復号化 | リストからメール送信 | スーパーフィルター | 特殊フィルタ(太字のフォントを持つセルをフィルタリング/斜体/取り消し線。。。) 。。。 | |
| トップ15 ツールセット:12 テキストツール(テキストの追加、特定の文字を削除、...)| 50+チャートタイプ(ガントチャート、...)| 40+実用的関数(誕生日に基づいて年齢を計算します、...)| 19 挿入ツール(QR コードを挿入、パスから画像を挿入、...)| 12 変換ツール(単語に変換する、為替レートの変換、...)| 7 結合と分割ツール(高度な行のマージ、セルの分割、...)|さらに多数 |
Kutools for Excel でExcel スキルを強化し、これまでにない効率を体験しましょう。Kutools for Excel は、生産性を高め、時間を大幅に節約できる高度な機能を300 以上提供します。最も必要な機能を今すぐ入手するにはこちらをクリック。。。
Office Tab は Office にタブインターフェースをもたらし、作業を大幅に簡単にします
- Word、Excel、PowerPoint でタブを使った編集と閲覧を有効にします。Publisher、Access、Visio、Project でもご利用いただけます。
- 複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。
- 日々の生産性を50%も向上させ、毎日数百回ものマウスクリックを削減します!
すべてのKutools アドインが、たった1 つのインストーラーで完結。
Kutools for Officeスイートには、Excel ・Word ・Outlook ・PowerPoint 用のアドインと Office Tab Pro が含まれており、複数の Office アプリを横断して作業するチームに最適です。
- オールインワンスイート— Excel、Word、Outlook、PowerPoint 用アドイン+Office Tab Pro
- インストーラー1 つ、ライセンス1 つ— 数分でセットアップ可能(MSI 対応)
- 連携してさらにパワーアップ— Office アプリ全体で生産性が向上
- 30 日間のフル機能トライアル— 登録不要、クレジットカード不要
- 最高のお得感— 個別アドイン購入よりお得