excel文件中時間和日期擷取問題

可以利用轉換格式的函式來解決。如圖所示：

這種情況最完美的**：

sub test3()

dim text as date

dim totalrow  as integer  '如果資料行數不確定，可以動態定義一下，動態獲取

totalrow = worksheets("sheet1").usedrange.find(what:="*", searchorder:=xlbyrows, searchdirection:=xlprevious).row

for i = 1 to totalrow 

text = sheets("sheet1").cells(i, 1)

sheets("sheet1").cells(i, 5) = format$(text, "yyyy/m/d")

sheets("sheet1").cells(i, 6) = format$(text, "h:nn:ss")

next i

end sub

剛開始做的時候，用擷取字串的方式，有時候會擷取的位數不對**如下：

定義的datetext2是date型別，擷取位數不對的話還會報型別錯誤。 

sub test()

dim text as date

dim c as integer

dim datetext1 as date

dim datetext2 as date

text = sheets("sheet1").cells(2, 1)

c = instr(text, " ")

datetext1 = left(text, instr(text, " ") - 1) '擷取左邊日期

datetext2 = right(text, instr(text, " ") - 1) '擷取右邊時刻

end sub

C 日期時間擷取

關鍵字 c 日期時間 擷取 datetime dt datetime.now label11.text dt.tostring 2005 11 5 13 21 25 label12.text dt.tofiletime tostring 127756416859912816 label13.text...

Excel 日期和時間運算

一.標準的日期格式 1.y m d 2.y m d 3.y年m月d日 二.非標日期的修復 1.使用分列功能 2.使用替換substitute函式 substitute a1,三.獲取日期資訊 1.year month day 2.星期幾 weekday 3.第幾周 weeknum 四.日期的運算 1...

C 讀取Excel日期時間

c 這樣讀取excel日期時有問題 在excel中把你的日期列的格式設定一下,設成 文字 型,就不會這樣了 在讀excel日期的時候，如果單元格格式設定為date，那麼就要注意 這裡要做乙個判斷，如果該單元格是乙個double值，那麼就要用datetime.fromoadate double.par...