2014-09-12 108 views
0

我在Excel中有一個日期格式是VBA代碼字符串格式轉換到日期格式

週五8月22日美國東部時間一時10分24秒2014

我想把它轉換成轉換爲使用VBA編碼的08/22/2014 1:10 am格式。

+0

你試過了什麼?重要的是,您要提供一個您嘗試過的最簡單的例子,您輸入的輸入,您期望的輸出以及您實際收到的輸出。 – 2014-09-12 22:37:45

+0

請說明是存儲在單元格或變量中的「2014年8月22日星期五01:10:24 EDT」嗎?如果是單元格值 - 數據類型是什麼:字符串或自定義格式化日期? – omegastripes 2014-09-12 22:40:34

+0

這是我第一次使用VBA。我嘗試過CDate功能和修剪功能,但沒有成功。 – 2014-09-12 22:41:06

回答

0

試試這個:

Function CONVDATE(mydate) As Date 
    Dim arr 
    arr = Split(mydate) 
    CONVDATE = arr(1) & " " & arr(2) & " " & arr(5) & " " & arr(3) 
End Function 

這應該提供的表達標準。
它會返回一個日期然後你可以在Excel中使用自定義格式來獲得你想要的格式。 HTH

結果:

enter image description here

你可以把它當作一個工作表功能,並進入正常的公式。

+0

感謝您的幫助,但我有一個問題,我該如何分配顏色的值並在另一個顏色中顯示。我也需要爲整個色彩做這個。再次感謝:) – 2014-09-12 22:50:09

+0

這就是爲什麼我寫了一個函數的原因,所以你可以在工作表中使用它,就像普通的* Excel函數*然後只是複製粘貼公式。 – L42 2014-09-12 23:09:10

+0

哦,非常感謝,它真的有用! – 2014-09-13 13:58:10