4年に一度のスポーツの祭典　全競技速報中

Accessの表形式のフォームについて

解決済

  • 質問者：St_bk_0816
  • 質問日時：
  • 回答数：3件

現在、Access2000で表形式のフォームを作成しています。
一点行き詰まっていることがあるので、どなたか教えて下さい。

いくつか項目がある表形式のフォームがあります。
項目２には日付を入れるのですが、隣にボタンを作り押すことにより
項目２に今日の日付が入るようにします。
そこで質問ですが、項目２に既に日付が入っている場合は、ボタンを
表示させたくないのですが、プロパティの”可視/Visible/”を触ると
表全部（行）に見えたり見えなかったりしていますます。
１行毎に制御することはできないのでしょうか？
詳しい方、どうか教えて下さい。お願い致します。

--こうなってしまう---------------------------
項目１　　　項目２　　　　　　　　項目３　・・・
AAA　　　2009/11/24[ボタン］　　XXX
BBB　　　　　　　　　　　[ボタン］　　YYY
CCC　　　2009/11/25[ボタン］　　ZZZ

--こうしたい---------------------------------
AAA　　　2009/11/24　　　　　　　XXX
BBB　　　　　　　　　　　[ボタン］　　YYY
CCC　　　2009/11/25　　　　　　　ZZZ

通報する

この質問への回答は締め切られました。

質問の本文を隠す
gooドクター

A 回答 (3件)

No.3ベストアンサー

  • 回答者： 30246kiku
  • 回答日時：

コマンドボタンはレコードごとに制御できなかったかと思います。



ボタン的な表示にはならないのですが、
試される時には、元に戻せる状態にしてからやってみてください。


以下例）

・今のボタンは削除します。

・テキストボックスを同じ位置に配置します。
ラベル部分は要らないので、削除しておきます。

プロパティで、
コントロールソース： =IIF(IsNull([項目２]),"今日","")
タブストップ：　いいえ

「フォーカス取得後」イベントで以下の様な記述します。

Private Sub テキストボックス_GotFocus()
　　If (IsNull(Me.項目２)) Then
　　　　Me.項目２ = Date
　　End If
　　Me.項目３.SetFocus
End Sub


以下プロパティはお好みで

境界線スタイル：　透明
文字配置：　中央


※文字表示が無くてもクリック操作はできるので、すぐに項目３に移動させます。

※テキストボックスには、"今日" の文字が表示されます


という方法はどうでしょうか。
    • good
    • 0
    • 件
通報する
この回答へのお礼

回答ありがとうございました。
分かりやすい説明に感謝致します。

確かにボタンの表示・非表示とは異なりますが、
お陰様で、大分イメージに近い状態ができました。
ありがとうございました。

通報する
お礼日時：2009/11/27 18:46

No.2

  • 回答者： H-SYS-03
  • 回答日時：

マクロはそれで大丈夫です。



フォームのプロパティにある「イベント」内の「開く時」に作成したマクロを指定してみてください。

ただし、これはそのフォームを「開いた時」のみ実行されますので、何か処理をした後に都度更新したい場合は、もう一工夫必要です。

この回答への補足

早々に回答頂きありがとうございます。

フォームの「開く時」にマクロを指定してみましたが、
やはり変わりなく、”項目２”に日付が入っている入って
いないに関わらずデータ全部の行に[ボタン]が表示されています。

補足日時：2009/11/26 18:01
通報する
    • good
    • 0
    • 件
通報する
この回答へのお礼

何度も回答頂きありがとうございました。

いろいろ試しましたが、やはり私の勉強が足りないようで
できませんでした。
上の方の方法でできそうですので、今回はそれで対応
してみます。

通報する
お礼日時：2009/11/27 18:44

No.1

  • 回答者： H-SYS-03
  • 回答日時：

こんにちは。



マクロの条件にIsNull([項目２])を入力し、アクションに
値の代入を指定し、
アイテム：ボタン.Visible
式:YES

としてもだめでしょうか？
    • good
    • 0
    • 件
通報する
この回答へのお礼

回答ありがとうございました。

私、Accessはまだまだ勉強中の身なので、やり方が違うのかも
しれませんが、うまくいきません。

ちなみにやり方ですが、マクロを”新規で作成”を行い、左
クリックで”条件”を指示し条件欄を追加（表示？）。
そこにIsNull([項目２])と記入。
”条件”の隣の”アクション”欄に値の代入を指定し、
アイテム：ボタン.Visible
式:YES
と記入。そして、フォーム画面でコマンドボタンウィザードで
マクロ実行としながら上で作成したマクロを指示。
これだけ行ったのですが、手順は良いのでしょうか？

通報する
お礼日時：2009/11/26 16:43

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

Q質問する（無料）

このQ&Aを見た人はこんなQ&Aも見ています

gooドクター

関連するカテゴリからQ&Aを探す

ページトップページトップ

Q質問する（無料）

このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング

おすすめ情報