Microsoft Access 掲示板

ラベルの配置をVBAで書き換える方法 / 1

2 コメント
views
4 フォロー
1

デザインビューにしてからプロパティを変更して、閉じるときに保存すれば、次回開いたときに変更が反映されてます。

  Dim fm As String
  Dim ctl As Control

  fm = "フォーム1"
  DoCmd.OpenForm fm, acDesign 'デザインビューに切り替え
  Set ctl = Forms(fm)!ラベル1
  ctl.Left = 100
  ctl.Top = 100
  DoCmd.Close , , acSaveYes '保存して閉じる
  DoCmd.OpenForm fm         '再度開く

ただ、運用中に頻繁にデザインビューに変更して、変更を保存するのは破損のリスクが高くなるので避けたいところです。

プロパティの変更値をテーブルに保存しておいて、フォームを開くときのイベントで、そのプロパティ値を設定するという設計をお勧めします。

通報 ...