
コマンドボタンを押すと、ユーザーフォームが表示されるマクロを組んでおります。
このとき、ユーザーフォームの表示位置をあるセル(例えばE12)の隣にしたいのですが、
下記のマクロでは、画面をスクロールした場合に対応できません。
恐れ入りますが、ご教示いただけるとたすかります。。
Private Sub UserForm_Initialize()
Me.StartUpPosition = 0
Me.Top = Application.Top + 180
Me.Left = Application.Left + 100
Me.Height = 80
Me.Width = 100
End Sub
投稿日時 - 2010-03-11 10:09:05
No.2ベストアンサー
- 回答日時:
>セル(例えばE12)の隣にしたいのですが
Private Sub UserForm_Initialize()
With Me
.StartUpPosition = 0
.Left = ActiveWindow.PointsToScreenPixelsX((Range("E12").Left) * 96 / 72) * (ActiveWindow.Zoom / 100) * 72 / 96
.Top = ActiveWindow.PointsToScreenPixelsY(Range("E12").Top * 96 / 72) * (ActiveWindow.Zoom / 100) * 72 / 96
.Height = 80
.Width = 100
End With
End Sub
本当にありがとうございます。
希望したことを、正確に行うことができました。
感謝の一言につきます。
その上、具体的にマクロをご提示いただき、大変たすかりました。
感謝しております。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
マクロボタンが勝手に飛び回る
-
ExcelのComboboxでマウスのスク...
-
ACCESS フォームのサイズ調整
-
エクセルのVBAでマクロ実行...
-
エクセルで、抽出したデータだ...
-
【AccessVBA】レコードセットOp...
-
Accessのコンボボックスでリス...
-
access サブフォームにリストを...
-
Access サブフォームでの選択行...
-
Access 複数フォームを...
-
「パラメータが少なすぎます。3...
-
Accessでデータを更新したらそ...
-
ACCESS フォームで抽出したデー...
-
ACCESS 複数のフォームから同一...
-
ACCESSでVBAから選択クエリの抽...
-
access別のテーブルを参照して...
-
PDFファイル/抽出許可され...
-
access クエリ yes/no型のクエ...
-
インデックスまたは主キーにはn...
-
Accessのコンボボックスの値が...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ExcelのComboboxでマウスのスク...
-
スクロールバーをVBAで操作したい
-
Access2000 フォーム表示位置が...
-
ACCESS フォームのサイズ調整
-
実行エラー'424' ????
-
マクロボタンが勝手に飛び回る
-
エクセルのVBAでマクロ実行...
-
エクセル上に画像を貼り付けて...
-
EXCEL VBA フォームクローズと...
-
Accessのマクロについて質問です。
-
アクセスのカレンダーコントロ...
-
Accessのサブフォームを検索
-
ワークシート上に検索用のボッ...
-
マクロを含んだexcelブックの保...
-
Exitイベントから自分自身のコ...
-
コマンドボタンを押すと、ユー...
-
ACCESSアクションマクロでイン...
-
エクセル2000のオプションボッ...
-
ACCESS(アクセス) マクロを使...
-
accessのメニュー画面について...
おすすめ情報