在列表視圖中更改日期格式EXCEL VBA

Question

我有一個listview，但是啟動宏時，它將日期格式從“ [h]：mm：ss”更改為“常規”。

我的代碼說

    itmX.SubItems(4) = Range("F" & i).Value
    itmX.SubItems(5) = Range("G" & i).Value
    itmX.SubItems(6) = Range("H" & i).Value
    itmX.SubItems(7) = Range("I" & i).Value

有什么辦法可以解決？ 為了獲得格式“ [h]：mm：ss”？ 非常感謝你

Answer 1

編輯

在將.value with .text替換為.value with .text之后，請嘗試如下所示：

timX.SubItems(4) = Range("F" &  i).Text

時間和日期只是excel中今天日期的數字的掩碼，或者時間值只是具有以下格式掩碼的數字

26/01/16 = 42395
1:02:03 = 0,0430902777777778

使用該value您可以將子項設置為單元格的基礎值

編輯結束

---

您可以使用numberformat屬性

 ThisWorkbook.Worksheets("Name of your worksheet").Range("A1").NumberFormat = "[H]:mm:ss" 

Answer 2

也許你可以應用這個

myTimeString.Text = Format(Now, "MM/dd/yyyy h:mm:ss tt")

即輸出

myTimeString將顯示2014/03/24下午12:49:23

檢查一下

問候克勞迪奧