請問2010輸入日期

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 255
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2024-11-25

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

2^#

發表於 2011-5-19 23:11 | 只看該作者

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

你應該沒安裝ACCESS所以找不到月曆控制項12.0
安裝月曆控制項
換成月曆控制項12.0安裝即可

安裝月曆控制項.rar (77.6 KB)

學海無涯_不恥下問

帖子: 13
主題: 5
精華: 0
積分: 29
點名: 0
作業系統: Windows7
軟體版本: Office2010
閱讀權限: 10
性別: 女
註冊時間: 2011-5-19
最後登錄: 2018-2-2

3^#

發表於 2011-5-20 15:50 | 只看該作者

太嫩無法下載  能否mail [email protected]

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

oobird

　頭銜: 街友一族

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

4^#

發表於 2011-5-20 17:11 | 只看該作者

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

帖子: 13
主題: 5
精華: 0
積分: 29
點名: 0
作業系統: Windows7
軟體版本: Office2010
閱讀權限: 10
性別: 女
註冊時間: 2011-5-19
最後登錄: 2018-2-2

5^#

發表於 2011-5-23 16:58 | 只看該作者

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

謝謝！成功了！
:D

帖子: 13
主題: 5
精華: 0
積分: 29
點名: 0
作業系統: Windows7
軟體版本: Office2010
閱讀權限: 10
性別: 女
註冊時間: 2011-5-19
最後登錄: 2018-2-2

6^#

發表於 2011-5-23 17:08 | 只看該作者

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

Hsieh

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 255
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2024-11-25

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

7^#

發表於 2011-5-23 17:43 | 只看該作者

回復 6# applepal
安裝2003的控制項，在2010中編輯
編輯完存成97-2003活頁簿就能在2003版本中使用

學海無涯_不恥下問

帖子: 13
主題: 5
精華: 0
積分: 29
點名: 0
作業系統: Windows7
軟體版本: Office2010
閱讀權限: 10
性別: 女
註冊時間: 2011-5-19
最後登錄: 2018-2-2

8^#

發表於 2011-5-24 16:57 | 只看該作者

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

GBKEE

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

9^#

發表於 2011-5-24 17:17 | 只看該作者

回復 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

帖子: 13
主題: 5
精華: 0
積分: 29
點名: 0
作業系統: Windows7
軟體版本: Office2010
閱讀權限: 10
性別: 女
註冊時間: 2011-5-19
最後登錄: 2018-2-2

10^#

發表於 2011-5-25 14:04 | 只看該作者

哇～好感謝！這就是我要的謝謝GBKEE .Hsieh .oobird ！