Microsoft Access 掲示板
カレンダー表示時に当月を表示 / 3
最新トピック
8
12 日前
Hatena様にご質問 12 日前
1
2 ヶ月前
排他制御 2 ヶ月前
6
5 ヶ月前
ﾓｼﾞｭｰﾙでｶﾚﾝﾄﾌｫｰﾑのｺﾝﾄﾛｰﾙを使うには 5 ヶ月前
7
5 ヶ月前
日付のテキストボックスからフォームが開けません 5 ヶ月前
9
5 ヶ月前
レポートにおける数値の間隔を広げる方法 5 ヶ月前
12
5 ヶ月前
リストボックスから複数選択しそれをテーブルに格納したい 5 ヶ月前
タグリスト
Markdown テーブル生成
Accessのテーブルやクエリのデータを貼り付ける場合は下記で、Markdown書式のテーブルに変換して貼り付けてください。
'フォーム 開くとき
Private Sub Form_Open(Cancel As Integer)
Dim i As Integer
For i = 1 To 42
Me("T" & i).OnClick = "=SetDate(" & i & ")"
Next
Me.cmdPrev.OnClick = "=MoveMonth(-1)"
Me.cmdNext.OnClick = "=MoveMonth(1)"
' SetCalendar DLookup("日付", "T_予定") '開く時の日付表示
SetCalendar Format(Now(), "yyyy/mm/dd")
End Sub
私はこれで動きました。