Discussion:
顯示時間
(时间太久无法回复)
EXCEL 輸入後如何鎖定或保護
2007-04-30 03:02:01 UTC
Permalink
輸入A欄位
可否於B欄位顯示輸入的時間及日期
Jackie Fu
2007-04-30 08:06:02 UTC
Permalink
試試利用Visual Basic 編輯器在sheet1程式碼
物件:Worksheet
程序:Change
加入下列程式碼

Private Sub Worksheet_Change(ByVal Target As Range)

　　If Target.Column = 1 Then

　　Target.Offset(0, 1) = Time

　　End If

End Sub


PS :
1. 當A欄輸入1時B欄會出現系統時間
2. Target.Offset(0, 1) = Time 試試變更 0、1及Time 也可改為Now 或 Date
--
Jackie Fu


"EXCEL 輸入後如何鎖定或保護" 來函：
Post by EXCEL 輸入後如何鎖定或保護
輸入A欄位
可否於B欄位顯示輸入的時間及日期
EXCEL 輸入後如何鎖定或保護
2007-05-02 05:41:02 UTC
Permalink
已ok
感謝!!

但是碰到另一個問題
A 輸入後, B顯示日期時間
但是
若B儲存格設定為"保護"(鎖定)時便無法使用

不知是否有其它方式
可保護B 不被變更

"Jackie Fu" 來函：
Post by Jackie Fu
試試利用Visual Basic 編輯器在sheet1程式碼
物件:Worksheet
程序:Change
加入下列程式碼
Private Sub Worksheet_Change(ByVal Target As Range)
　　If Target.Column = 1 Then
　　Target.Offset(0, 1) = Time
　　End If
End Sub
1. 當A欄輸入1時B欄會出現系統時間
2. Target.Offset(0, 1) = Time 試試變更 0、1及Time 也可改為Now 或 Date
--
Jackie Fu
"EXCEL 輸入後如何鎖定或保護" 來函：
Post by EXCEL 輸入後如何鎖定或保護
輸入A欄位
可否於B欄位顯示輸入的時間及日期
Jackie Fu
2007-05-02 17:36:00 UTC
Permalink
請您利用Visual Basic 編輯器將下列程式碼:
Private Sub Worksheet_Change(ByVal Target As Range)

　　If Target.Column = 1 Then

　　Target.Offset(0, 1) = Time

　　End If

End Sub

新增於A欄所在的工作表中，配合EXCEL 輸入後如何鎖定或保護的巨集，即可輸入A欄資料又可以保護AB二欄在資料輸入後不被修改
--
Jackie Fu


"EXCEL 輸入後如何鎖定或保護" 來函：
Post by EXCEL 輸入後如何鎖定或保護
已ok
感謝!!
但是碰到另一個問題
A 輸入後, B顯示日期時間
但是
若B儲存格設定為"保護"(鎖定)時便無法使用
不知是否有其它方式
可保護B 不被變更
"Jackie Fu" 來函：
Post by Jackie Fu
試試利用Visual Basic 編輯器在sheet1程式碼
物件:Worksheet
程序:Change
加入下列程式碼
Private Sub Worksheet_Change(ByVal Target As Range)
　　If Target.Column = 1 Then
　　Target.Offset(0, 1) = Time
　　End If
End Sub
1. 當A欄輸入1時B欄會出現系統時間
2. Target.Offset(0, 1) = Time 試試變更 0、1及Time 也可改為Now 或 Date
--
Jackie Fu
"EXCEL 輸入後如何鎖定或保護" 來函：
Post by EXCEL 輸入後如何鎖定或保護
輸入A欄位
可否於B欄位顯示輸入的時間及日期
Loading...