xmi

¦^´_  sghsgh1111
¸Õ¸Õ¬Ý
GBKEE µoªí©ó 2015-3-10 08:13

½Ð°Ý¦pªG¬O¥HCELLªºINPUTÀ³¦p¦ó§ï?
¦p:
A1           A2            Result
13:00     15:00        2¤p®É
22:00     03:00        5¤p®É

xmi

¦^´_ 9# sghsgh1111

ÁÂÁ§A...
½Ð°Ý¦pªG¬O¥H¤U§Î¦¡¤SÀ³¦p¦ó§ï?
¦p:
A1           A2            Result
13:00     15:00        2¤p®É
22:00     27:00        5¤p®É
23:00     25:45   2.75¤p®É

xmi

¦^´_ 11# sghsgh1111


    §A¦n, 25®É§Y¬O¹s±áªº1®É(24+1) , ¥Î¥H­povernightªº®É¶¡.

xmi

¦^´_  xmi
sghsgh1111 µoªí©ó 2015-3-14 17:56

1. Sub ex()
   
2.     Dim a, b, c
   
3. 
   
4.     For c = 1 To 20
   
5.         a = Range("A" & c + 1).Value
   
6.         b = Range("B" & c + 1).Value
   
7.         If a = "" Then Exit For
   
8.         If b < a Then b = b + 1
   
9.         With Cells(c + 1, 3)
   
10.             .Value = (b - a) * 24
    
11.             .NumberFormat = "0.00®É"
    
12.         End With
    
13.     Next
    
14. End Sub

½Æ»s¥N½X

³o­Óµ²ªG¥X¿ù¤F, ³Ì§À¨â­Óªºµ²ªGÀ³¬O2.45¤p®É, ©M2.12¤p¤~¹ï.  ½Ð°Ý¿ù¦b¨º¸Ì?

1. Start        End                Duration
   
2. 13:00        15:00        2.00®É
   
3. 22:00        3:00                5.00®É
   
4. 23:00        1:45                2.75®É <-- À³¬O2.45
   
5. 23:00        1:12                2.20®É <-- À³¬O2.12

½Æ»s¥N½X

xmi

¦^´_ 14# stillfish00


    ¹ï§r 23:00~23:30 ¬O0.5¤p®É , ¤£¬O0.3¤p®É, §Ú¨S¦³·Q¿ù§r... ¦ý¼Ó¤Wªºµ²ªG´NÅã¥Ü¿ù»~...¦ý§Ú¤£À´­×¥¿:(

xmi

¦^´_ 17# sghsgh1111


    ¤£¦n·N«ä, §ÚÁÙ¬O¤£©ú¥Õ....:Q

xmi

OH.... ­ì¨Ó¦p¦¹ ... ¨º¦pªG¼g¦¨2:45 ©M 2:12, ­n¦p¦ó? §Ú¤Ó²Â¤F

xmi

¦^´_ 20# GBKEE


    ¤ÓÁªO¥D¤F...­ì¨Ó¥u§ïformat    ".NumberFormatLocal = "hh.mm""®É""""  Åã¥Ü, §Ú²{¦b¯uªº©ú¥Õ¤F.