Microsoft Access 掲示板

カレンダー形式のスケジュール管理フォーム作成時における、日付の色を変更したい。 / 27

34 コメント
views
4 フォロー
27
hatena 2020/05/15 (金) 17:38:57 修正

確定フィールドに「確定」という文字を入力した場合、略名の前に「確定」と表示されます。

済みません。下記に修正してください。

    Do Until rs.EOF
        With Me("T" & rs!作業日 - FirstDay)
            .Caption = .Caption & rs!開始時間 & " " & IIf(rs!確定<>"","","☆") & rs!略名 & vbCrLf
        End With
        rs.MoveNext
    Loop

☆を赤色にすることはできますでしょうか。

現状のラベルでは無理です。
ラベルをテキストボックスに変換して、プロパティを下記のように設定。
「文字書式」プロパティを「リッチ テキスト形式」
「編集ロック」を「はい」

    Do Until rs.EOF
        With Me("T" & rs!作業日 - FirstDay)
            .value = .value & "<p>" & rs!開始時間 & " "  & IIf(rs!確定<>"",""," <font color=red>☆</font>") & rs!略名 & "</p>"
        End With
        rs.MoveNext
    Loop

他の部分の Caption も Value に修正、他に修正が必要かも知れません。
実際に試してませんので、うまくいかないかも知れません。

通報 ...