- ©«¤l
- 4
- ¥DÃD
- 1
- ºëµØ
- 0
- ¿n¤À
- 6
- ÂI¦W
- 0
- §@·~¨t²Î
- WIN7
- ³nÅ骩¥»
- OFFICE2016
- ¾\ŪÅv
- 10
- µù¥U®É¶¡
- 2017-2-26
- ³Ì«áµn¿ý
- 2017-6-15
|
®É¶¡1:8:20:10
®É¶¡2:10:10:05-------A1
¤u®É:1:49:55----------B1
µ²ªG------------------C1
¥ý§â¸ê®ÆK¶iexcel¡A®æ¦¡³]©w®É¶¡®æ¦¡¡Ahh:mm:ss
sub work_time()
Sheet1.Range("C1") = Sheet1.Range("B1") - Sheet1.Range("A1")
end sub |
|