- ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Excel VBAで時刻の判定)
Excel VBAで時刻の判定
このQ&Aのポイント
- Excel VBAを使用して、複数のエクセルファイル内の時刻を判定する方法を教えてください。
- A.xlsとB.xlsという2つのエクセルファイルがあります。A.xlsでは開始時刻と終了時刻が、B.xlsでは開始時刻と終了時刻が記録されています。A.xlsの開始時刻から終了時刻までの時間範囲とB.xlsの開始時刻から終了時刻までの時間範囲が重なっている場合に処理を行う方法を教えてください。
- 具体的な例として、A.xlsの開始時刻が1:00で終了時刻が3:00、B.xlsの開始時刻が2:00で終了時刻が5:00の場合、時刻がかぶっていると判定する方法を教えてください。
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
内容が時刻であれば単に値を比較するだけです。 Aの開始時刻 = Wrokbokks("A.xls").WorkSheets(1).Cells(1, 1).Value 以下略 If (( Aの開始時刻 >= Bの開始時刻 ) AND ( Aの開始時刻 <= Bの終了時刻 )) _ Or (( Bの開始時刻 >= Aの開始時刻 ) AND ( Bの開始時刻 <= Aの終了時刻 )) Then MsgBox "時刻がかぶっています" End If
お礼
できました!ありがとうございました。