エクセルです。ファイルを開いたとき、ユーザーフォームを右下に表示させたいのでガ、どうすればよいか教えてください。

回答の条件
  • URL必須
  • 1人2回まで
  • 登録:2008/04/21 00:01:52
  • 終了:2008/04/28 00:05:02

回答(3件)

id:SALINGER No.1

SALINGER回答回数3454ベストアンサー獲得回数9692008/04/21 00:31:47

ポイント35pt

こんな感じでどうでしょう。

Private Sub Workbook_Open()
    UserForm1.Show (vbModeless)
    UserForm1.Top = Application.Top + Application.Height - UserForm1.Height
    UserForm1.Left = Application.Left + Application.Width - UserForm1.Width
End Sub

http://q.hatena.ne.jp/

id:nomo10

貼り付けてみましたが、やはり中央に表示されてしまいます。

2008/04/21 00:52:17
id:Mook No.2

Mook回答回数1312ベストアンサー獲得回数3912008/04/21 00:59:11

ポイント35pt

基本はSALINGER さんのでよいと思いますが、

StartUpPosition の指定を追加してみてどうでしょうか。

Private Sub Workbook_Open()
   With UserForm1
        '--- 初期表示位置を表す値を指定しない
        .StartUpPosition = 0
        '--- 右下に位置を合わせる
        .Top = Application.Top + Application.Height - .Height
        .Left = Application.Left + Application.Width - .Width
        '--- 表示する
        .Show
    End With
End Sub

http://www.geocities.jp/happy_ngi/YNxv230.html

id:nomo10

やはり中央のままです…。やり方が違うのでしょうか…。

2008/04/21 01:10:38

質問者が未読の回答一覧

 回答者回答受取ベストアンサー回答時間
1 an_shoku_panman 14 13 0 2008-04-21 00:36:28

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません