A　　B
1　山田　10:50
2　山田　11:50
3　山田　4:50

山田の時間（B列）を1行目から順番に変数（a）に代入して合計を計算して、
Application.Floor(a + TimeValue("0:30"), TimeValue("1:00"))で
30分繰り上げ（例えば1:30の場合2:00に繰り上げ）しているのですが、
総計が24時間を超えると"1900/1/1  28:00"と日付が入り、表示形式がおかしくなってしまいます。
繰り上げのコードが間違っているのでしょうか？