フォームを開くと同時にコントロールを削除したい

質問

フォームを開くと同時にコントロールを削除したいのですが、

Private Sub Form_Load()　イベントで、

DoCmd.OpenForm Me.Name, acDesign
DeleteControl Me.Name, "コマンド9"

こうしてみたのですが、別のビューに切り替えることはできません、となります。

DoCmd.OpenForm Me.Name, acDesign
これをナシにすると、

DeleteControl Me.Name, "コマンド9"
この部分で
コントロールの作成と削除は、デザインビューまたはレイアウトビューで行います。

となります。
どうすればいいでしょうか？
アドバイスよろしくお願いします。

回答No.3

tsubuyuki · ベストアンサー

> フォームを開くと同時にコントロールを削除したい

最初から「削除したいコントロールを配置しない」でおけば万事解決では？
削除するコントロールならフォームに置く必要も無いのですから。

「別のコントロールへの演算に使用している」から必要なんだ、という事なら、
フォームのデータソースを見直せば良い話です。
あるいは既に他さまから提示がありますが、コントロールを不可視にしてやるのも有用な手段です。

どちらにしても、
「開いた時にコントロールＡを削除⇒閉じる時に上書き保存
　⇒次回開く特にコントロールＡが見つからなくてエラー」
という悪循環に陥る可能性がありますから、オススメはしません。

お礼

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

回答No.2

kmetu

別のフォームから開くのでしたら
DoCmd.OpenForm "フォーム名", acDesign
このように開けばいいのではないでしょうか。

また、なぜ削除するのか分かりませんが、削除しなくて見えなくするというのではダメなのでしょうか。

Me![コマンド9].Visible = False

お礼

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

回答No.1

masatsan

何故そんなことするのか意味がわかりませんが
最初からコントロールがないフォームにするのはきっと駄目なんですよね。
不可視、使用できないように設定したら。

お礼

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