[µo°Ý] Àx¦s®æ§R°£®É¶¡³¡¤À

lifedidi

¤j¤j¦n¡G

§Ú±qoffice project¶×¥X¦¨excelÀɮסA¨ä¤¤¶}©l¤é´Á¸òµ²§ô¤é´ÁÄæ¦ì®æ¦¡¬°¡iyyyy/mm/dd AM®É¶¡¡j

¦³¨S¦³¤èªk¥i¥H§Ö³t§R°£¾ãÄæ®É¶¡¥u³Ñ¤U¤é´Á®æ¦¡¡iyyyy/mm/dd¡j©O¡AÁÂÁ¡C

¥t¥~DÄæ¦ì¤u®É¦³­Óh¬O§_¤]¯à§R°£©O¡HÁÂÁ¡I

project½d¨ÒÀÉ.rar (8.74 KB)

¤U¸ü¦¸¼Æ: 8

2013-6-30 18:04

GBKEE

¦^´_ 1# lifedidi

1. Option Explicit
   
2. Sub Ex()
   
3.     With Sheets("½Ö¦b°µ¤°»ò")
   
4.         .[B:B].Replace " 8:00:00 AM", "", xlPart
   
5.         .[C:C].Replace " 5:00:00 PM", ""
   
6.         .[D:D].Replace "h", ""
   
7.     End With
   
8. End Sub

½Æ»s¥N½X

lifedidi

¦^´_ 2# GBKEE


    ÁÂÁÂGBKEE¤j¤j¡I¤S¾Ç¨ì¤@½Ò¡C

mhl9mhl9

¥Îworksheetfunction¥i¥Hº¡¨¬,¦ý­n¥[Äæ¦ì¹L´ç(­ìÄæ¦ìÁôÂÃ)
=LEFT(B2,FIND(" ",B2)-1)
=LEFT(D2,LEN(D2)-1)