12
返回列表 上一主題 發帖

[發問] 如何分開日期和時間

donod

帖子
140 
主題
24 
精華
0 
積分
167 
點名
0  
作業系統
WIN 7 
軟體版本
OFFICE 2007 
閱讀權限
20 
性別
男 
註冊時間
2012-2-26 
最後登錄
2023-1-30 
11# 跳轉到 »
發表於 2013-4-14 10:55 | 顯示全部帖子
回復 17# GBKEE


2013/04/02/09/21/00; 22159; 22159; 22131; 22131; 330
2013/04/02/09/22/00; 22133; 22140; 22130; 22140; 153
2013/04/02/09/23/01; 22140; 22148; 22134; 22139; 109
請問在匯入源檔案時，不匯入屬於時間中的秒值(紅色數字)，可以怎麼寫，再次謝謝版大!

TOP

donod

帖子
140 
主題
24 
精華
0 
積分
167 
點名
0  
作業系統
WIN 7 
軟體版本
OFFICE 2007 
閱讀權限
20 
性別
男 
註冊時間
2012-2-26 
最後登錄
2023-1-30 
12#
發表於 2013-4-14 23:08 | 顯示全部帖子
回復  donod
GBKEE 發表於 2013-4-14 14:49


謝謝版大!
以下是小輩之後試的:
    .Cells.Replace "/01;", " ", xlPart '用空格代替 "/01;" 作為delete秒值
    .Cells.Replace ";", " ", xlPart

如果在 .Cells.Replace ";", " ", xlPart 之前加入.Cells.Replace "/01;", " ", xlPart ，雖然結果與版大的一樣，在運作上實則有什麼分別，謝謝!

TOP

donod

帖子
140 
主題
24 
精華
0 
積分
167 
點名
0  
作業系統
WIN 7 
軟體版本
OFFICE 2007 
閱讀權限
20 
性別
男 
註冊時間
2012-2-26 
最後登錄
2023-1-30 
13#
發表於 2013-4-15 17:56 | 顯示全部帖子
回復  donod
請問 text5的字串,可是全為2013/04/02/09/14/01;
如有 2013/04/02/09/15/00; 2013/04/02/09 ...
GBKEE 發表於 2013-4-15 16:52


版大一語道破，小輩忽略了這點!用版大的 E.Offset(, 1) = Replace(Mid(W, 12, 5), "/", ":") 就不需要理會秒值是否存在有/00或/01以外的組合。明白了，謝謝!
另外，如果是不匯入2013/04/02/09/14/01;中的某個(e.g.2013/04/02/09/14/01;)或某幾個字元(e.g.2013/04/02/09/14/01;)，當然是全部字串中的相同位，那如何修改，再謝謝版大!

TOP

donod

帖子
140 
主題
24 
精華
0 
積分
167 
點名
0  
作業系統
WIN 7 
軟體版本
OFFICE 2007 
閱讀權限
20 
性別
男 
註冊時間
2012-2-26 
最後登錄
2023-1-30 
14#
發表於 2013-4-15 23:59 | 顯示全部帖子
[版主管理留言]
  • GBKEE(2013/4/16 13:22): 以上兩個個別情況那如何修改?? 你沒說怎樣修改!!!

回復 24# GBKEE

1)不匯入一組字元
2013/04/02/09/21/00; 22159; 22159; 22131; 22131; 330
2013/04/02/09/22/00; 22133; 22140; 22130; 22140; 153
2013/04/02/09/23/01; 22140; 22148; 22134; 22139; 109


2) 不匯入兩組字元
2013/04/02/09/21/00; 22159; 22159; 22131; 22131; 330
2013/04/02/09/22/00; 22133; 22140; 22130; 22140; 153
2013/04/02/09/23/01; 22140; 22148; 22134; 22139; 109

以上兩個個別情況那如何修改，謝謝!

TOP

        靜思自在 : 忘功不忘過，忘怨不忘恩。
12
返回列表 上一主題