返回列表 上一主題 發帖

請問2010輸入日期

請問2010輸入日期

我在2010找不到月曆控制項

例如果整個BC兩攔都是需要輸入日期值(B欄:開始日期 / C欄:結束日期)
但我希望用點選儲存格--出現小月曆--點選日期  後自動帶入的方式

請問要怎麼作呢?

本帖最後由 Hsieh 於 2011-5-19 23:49 編輯

你應該沒安裝ACCESS所以找不到月曆控制項12.0
安裝月曆控制項
換成月曆控制項12.0安裝即可
安裝月曆控制項.rar (77.6 KB)
學海無涯_不恥下問

TOP

太嫩無法下載  能否mail    vapplev@gmail.com

另外  我現在找到了calendar 11.0
然後畫面上就出現一個月曆  我離開設計模式後  還是無法點選儲存格後顯示剛剛那個月曆來選日期
請問我該怎麼作呢

TOP

calendar 11.0
是2003用的,2010怎麼來的這個東西?
在設計模式,雙擊月曆控件
會出來如下:
Private Sub Calendar1_Click()

End Sub
改成如下:
Private Sub Calendar1_Click()
ActiveCell = Calendar1.Value
Calendar1.Visible = False
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 2 Or Target.Column = 3 Then
Calendar1.Visible = True
End If
End Sub

TOP

本帖最後由 applepal 於 2011-5-23 17:00 編輯

謝謝!成功了!
:D

TOP

不過我2010設計成功以後  2003就看不到了是嗎? 有辦法解決嘛?

TOP

回復 6# applepal
安裝2003的控制項,在2010中編輯
編輯完存成97-2003活頁簿就能在2003版本中使用
學海無涯_不恥下問

TOP

還有一個小問題  就是點選以後出現月曆  OK
如果我又不想輸入日期了  月曆就不會消失  我點其他儲存格他還是在那邊......

TOP

回復 8# applepal
oobird 版主的程式修改一下
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 2 Or Target.Column = 3 Then
Calendar1.Visible = True
Else
Calendar1.Visible = False

End If
End Sub

TOP

哇~好感謝!這就是我要的  謝謝GBKEE .Hsieh .oobird !

TOP

        靜思自在 : 每天無所事事,是人生的消費者,積極、有用才是人生的創造者。
返回列表 上一主題