Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

3415 / 13644 ﾂﾘｰ

←次へ　｜　前へ→

▼

【62384】ユーザーフォーム しん 09/7/15(水) 22:40

【62385】Re:ユーザーフォーム kanabun 09/7/15(水) 23:30


	【62384】ユーザーフォーム

しん - 09/7/15(水) 22:40 -


	引用なし

	パスワード

いつもお世話になります。
ユーザーフォームを作成し三角ボタンを押して実行したときに表示される位置
設定をしたいのですが、どうすればいいのでしょうか？
できれば画面いっぱいで表示したいのですが。。。


	【62385】Re:ユーザーフォーム

kanabun - 09/7/15(水) 23:30 -


	引用なし

	パスワード

▼しんさん：

>ユーザーフォーム
>表示される位置を設定をしたいのですが、
>できれば画面いっぱいで表示したいのですが。。。

Private Sub UserForm_Initialize()
　　Dim WW As Long, HH As Long
　　Dim acc As IAccessible

　　Set acc = Me
　　Set acc = acc.accParent
　　acc.accParent.accLocation 0, 0, WW, HH
　　Me.Move 0, 0, WW * 3 / 4, HH * 3 / 4
　　Me.StartUpPosition = 0

End Sub


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

3415 / 13644 ﾂﾘｰ

←次へ　｜　前へ→

ページ：

┃

記事番号：

(SS)C-BOARD v3.8 is Free