こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

ACCESS でCaption実行時エラーになる

ACCESS2010 VBA にて予定表カレンダーを作成しているのですが
フォームのテキストボックス(L0~L36)に日付を代入する際
captionの行のところで
エラー483 オブジェクトは、このプロパティまたはメソッドをサポートしていません。
が発生してしまいます。

visibleは動作しているので入力ミスはないとおもうのですが
原因がまったくわかりません。解決策を教えてください。


Set F = Forms![予定表カレンダー]
For i = 0 To 36
'曜日数値以下または月の最後の日を超えたなら表示は消す
If i < fday Or i > iend Then
F(i).Visible = False
Else
F(i).Caption = dd
F(i).Visible = True
dd = dd + 1
rstproduct.MoveNext
End If

投稿日時 - 2018-03-21 11:53:53

QNo.9480138

困ってます

質問者が選んだベストアンサー

テキストボックスにCaptionというプロパティは無いですよ。

投稿日時 - 2018-03-21 12:03:50

お礼

ありがとございます。
ラベルに変更したらできました

投稿日時 - 2018-03-21 13:09:00

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(2)

ANo.2

F(i)はテキストボックスですか、ひょっとしてテキストボックスに
付随するラベルへデータを表示するつもりではないですか。
質問の内容からするとテキストボックスを作成したときに自動的に
作成されるラベルに日付を入れようとしているように思われますが。
このラベルはオブジェクトとしてはテキストボックスとは独立して
いるので(もちろん連動はしていますが)、テキストボックスの
名前ではなくラベルの名前に対ししてアプローチする必要があります。
もちろん、ラベルにはCaptionというプロパティはあります。

投稿日時 - 2018-03-21 13:11:54

あなたにオススメの質問