使用 TODAY() 取得系統日期 然後固定不變 怎模做呢
- 帖子
- 173
- 主題
- 42
- 精華
- 0
- 積分
- 220
- 點名
- 0
- 作業系統
- win10
- 軟體版本
- Office 365
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2010-10-13
- 最後登錄
- 2023-10-11
|
使用 TODAY() 取得系統日期 然後固定不變 怎模做呢
本帖最後由 mycmyc 於 2010-10-13 23:32 編輯
使用 TODAY() 取得系統日期 然後固定不變 怎模做呢
不然 不管那天填寫日期 多變今天了
A4寫 =IF(A4="",TEXT(TODAY(),A4)) 變成1900/1/0 
怎麼辦 請教 謝謝
如
cell a1 b1 原來是空的
a1 加上資料後 b1 會自動跳出今天日期(today())
希望保留當天日期
下次開啟後無須跳到新的當日 |
|
|
HI
|
|
|
|
|
- 帖子
- 835
- 主題
- 6
- 精華
- 0
- 積分
- 915
- 點名
- 0
- 作業系統
- Win 10,7
- 軟體版本
- 2019,2013,2003
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2010-5-3
- 最後登錄
- 2024-11-14
|
2#
發表於 2010-10-13 23:46
| 只看該作者
本帖最後由 luhpro 於 2010-10-13 23:55 編輯
回復 1# mycmyc
其實本串這個例子應該是用 vba 比較容易達成而沒其他毛病,
若用儲存格公式應該都會出現 "循環參照" 的警告訊息.
不過還是有個方式可以做到 :
A4 = IF(C1=1,B1,B2)
B1 = NOW()
B2 = A4
C1 = 0
當手動將 C1 設為 1 時會將 A4 變成今天的日期, (如果沒變請手動重新計算)
否則(即 C1 <> 1)就保持舊值(存在 B2上, (所以應該要先給初值, 也就是 C1=1 最少要先做過一次)
本法中首次出現 "循環參照" 的警告時請直接按 "取消" 按鍵略過不變更現況,
其後手動將當 C1=1 改變成 C1 <> 1 時又會再次出現 "循環參照" 的警告,
請直接按 "確定" 忽略該訊息.
若需要重設 A4 為今天日期時,
請將 C1 的值設成 1 ,
等 A4 的值變動成今天日期後再將 C1 設成 <> 1 即可. |
|
|
|
|
|
|
|
- 帖子
- 173
- 主題
- 42
- 精華
- 0
- 積分
- 220
- 點名
- 0
- 作業系統
- win10
- 軟體版本
- Office 365
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2010-10-13
- 最後登錄
- 2023-10-11
|
3#
發表於 2010-10-14 00:12
| 只看該作者
回復 2# luhpro
感謝大大指教
我試了 還是有些問題 一改 C1=1 全變回來
我搜尋 如大大說的用VBA 比較好
能請大大 教我VBA嗎
我VBA 還不大行
麻煩你 詳細說明一下 謝謝你 |
|
|
HI
|
|
|
|
|
- 帖子
- 1572
- 主題
- 16
- 精華
- 2
- 積分
- 1521
- 點名
- 0
- 作業系統
- xp
- 軟體版本
- office 2003
- 閱讀權限
- 150
- 性別
- 男
- 註冊時間
- 2010-5-1
- 最後登錄
- 2016-1-13
|
4#
發表於 2010-10-14 00:54
| 只看該作者
|
|
|
|
|
|
|
- 帖子
- 1572
- 主題
- 16
- 精華
- 2
- 積分
- 1521
- 點名
- 0
- 作業系統
- xp
- 軟體版本
- office 2003
- 閱讀權限
- 150
- 性別
- 男
- 註冊時間
- 2010-5-1
- 最後登錄
- 2016-1-13
|
6#
發表於 2010-10-14 09:44
| 只看該作者
剛剛試了一下～真的馬上出現今天的日期耶！只是還得等到明天再看看那一格的日期會維持１０／１４或自動變成 ...
onegirl0204 發表於 2010-10-14 09:37 
很有趣！
若按耐不住時可改變一下系統日期，哈哈。 |
|
|
|
|
|
|
|
- 帖子
- 173
- 主題
- 42
- 精華
- 0
- 積分
- 220
- 點名
- 0
- 作業系統
- win10
- 軟體版本
- Office 365
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2010-10-13
- 最後登錄
- 2023-10-11
|
8#
發表於 2010-10-14 12:33
| 只看該作者
|
|
HI
|
|
|
|
|
- 帖子
- 7
- 主題
- 1
- 精華
- 0
- 積分
- 27
- 點名
- 0
- 作業系統
- Windows
- 軟體版本
- Win7
- 閱讀權限
- 10
- 性別
- 男
- 來自
- Taiwan
- 註冊時間
- 2010-9-14
- 最後登錄
- 2013-5-5
|
9#
發表於 2010-10-14 13:50
| 只看該作者
A1:99年10月13日
公式:=FIXED(YEAR(NOW())-1911,0,TRUE)&"年"&FIXED(MONTH(NOW()),0,TRUE)&"月"&FIXED(DAY(NOW()),0,TRUE)&"日"
vba
Sub Macro1()
Range("B1") = Range("A1")
End Sub
A1:99年10月13日(為公式)
B1:99年10月13日 (為文字)即為當時作業日期
----------------------------------------------------------------------
簡單說明如上...(測試後没問題) |
|
|
50 字節以內
不支持自定義 Discuz! 代碼
|
|
|
|
|
- 帖子
- 812
- 主題
- 7
- 精華
- 0
- 積分
- 862
- 點名
- 0
- 作業系統
- XP
- 軟體版本
- 2007
- 閱讀權限
- 100
- 性別
- 男
- 來自
- 台中
- 註冊時間
- 2010-5-13
- 最後登錄
- 2019-10-10
|
10#
發表於 2010-10-14 14:27
| 只看該作者
本帖最後由 ANGELA 於 2011-8-15 15:39 編輯
=IF(A1="","",IF(B1="",TEXT(TODAY(),"YYYY/mm/dd"),B1))
需啟用反覆運算. |
|
|
|
|
|
|
|
，像我這種新手就是不會想到變更系統日期，而選擇傻傻地等一天，幸好才等一天而已！
