Excel VBA質問箱 IV

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

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


7132 / 13645 ツリー ←次へ | 前へ→

【39474】ウィンドウズXPの画面のデザイン ライム 06/6/24(土) 19:50 質問[未読]
【39578】Re:ウィンドウズXPの画面のデザイン 漂流民 06/6/27(火) 0:16 発言[未読]
【39606】Re:ウィンドウズXPの画面のデザイン Jaka 06/6/27(火) 14:18 発言[未読]
【39634】Re:ウィンドウズXPの画面のデザイン ライム改めlime 06/6/28(水) 0:41 お礼[未読]
【39686】Re:ウィンドウズXPの画面のデザイン 漂流民 06/6/28(水) 23:29 発言[未読]
【39731】Re:ウィンドウズXPの画面のデザイン 漂流民 06/6/29(木) 23:34 質問[未読]
【41024】Re:ウィンドウズXPの画面のデザイン 漂流民 06/7/27(木) 22:04 お礼[未読]

【39474】ウィンドウズXPの画面のデザイン
質問  ライム  - 06/6/24(土) 19:50 -

引用なし
パスワード
   まだ始めたばかりの初心者で、フォームに画像を貼り付けたりして
学んで(遊んで?)いるのですが、せっかく可愛くつくっても
規定のどぎついブルーだと似合いません

自分は、コントロールパネルの画面のデザインでシルバーに変更しているのですが
この変更をVBAですることは可能ですか?(規定からシルバーとか?)

【39578】Re:ウィンドウズXPの画面のデザイン
発言  漂流民  - 06/6/27(火) 0:16 -

引用なし
パスワード
   これ、私も知りたいです。
ご存知でしたらご教授下さい。


勝手ながら質問補足:

Windows XP の【画面のプロパティ】→【デザイン】タブ で
【ウィンドウとボタン】が「Windows XP スタイル」の状態で
【配色】を「規定(青)」から「シルバー」に変更する。
これをユーザーフォームまたはWindows全体にVBAで行いたい。

従来のWindowsスタイル、つまりWindows XPでいう
【ウィンドウとボタン】が「Windows クラシック スタイル」なら
SetSysColors を使えば出来るのですが、
「Windows XP スタイル」では Visual Style(Luna)という一種のスキン
が使われているようですが、VBAでの変更/設定方法が分かりません。
(Theme系のAPIを使えば出来る??)

【39606】Re:ウィンドウズXPの画面のデザイン
発言  Jaka  - 06/6/27(火) 14:18 -

引用なし
パスワード
   API使って、さらにレジストリをいじる事になるみたいです。
VBだけど(私は、手を出したくないです。)
http://hp.vector.co.jp/authors/VA014315/vb2.htm

http://www.vector.co.jp/soft/dl/win95/amuse/se269674.html

【39634】Re:ウィンドウズXPの画面のデザイン
お礼  ライム改めlime  - 06/6/28(水) 0:41 -

引用なし
パスワード
   この質問箱にはライムさんが居られるようなので
新参者のあたしは「lime」に変更します(ライムさんごめんなさいね)

Jakaさん、ご回答ありがとうございました
漂流民さんも補足ありがとうございました

回答とそこにあったHPの内容は、まだチンプンカンプンでしたが
全部印刷してファイルに入れておきました(いずれ分かることを信じてw)
VBとか使って変更できるということが分かっただけでも
すごく嬉しいです

また、しょ〜もない質問をするかもしれませんが
みなさん、宜しくお願いします

【39686】Re:ウィンドウズXPの画面のデザイン
発言  漂流民  - 06/6/28(水) 23:29 -

引用なし
パスワード
   ▼Jaka さん:
>API使って、さらにレジストリをいじる事になるみたいです。
>VBだけど(私は、手を出したくないです。)
>http://hp.vector.co.jp/authors/VA014315/vb2.htm
そのページ見ましたが、結局レジストリ操作はしていませんよ。
パス取得やエラー処理などをを除けば、そのページでやっていることは、

Declare Function SystemParametersInfo Lib "user32.dll" Alias "SystemParametersInfoA" _
  (ByVal uiAction As Long, ByVal uiParam As Long, ByVal pvParam As Any, ByVal fWinIni As Long) As Long
Sub test()
Call SystemParametersInfo(20, 0, "グリーン ストーン.bmp", 3)
End Sub

これだけです。
(そのページの最後にもレジストリをいじっていないことが書いてあります)


ちなみに、SystemParametersInfoではシステム一般の取得・設定ができますが
「Windows XP スタイル」についてのパラメータはありません。
http://msdn.microsoft.com/library/ja/default.asp?url=/library/ja/jpsysinf/html/_win32_systemparametersinfo.asp

従来のWindowsスタイルではSetSysColors を使って変更できるので、、
http://msdn.microsoft.com/library/ja/default.asp?url=/library/ja/jpsysinf/html/_win32_setsyscolors.asp

同様にして XP スタイル も何かしら対応したAPIがあるのでは?と思い、visual style用の
Theme系のAPIを見ていましたが、ユーザーインターフェイスではダメなようです。
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/commctls/userex/functions/drawthemebackground.asp


システム情報関係のAPIも一通り見ましたが・・・
MSDN-Japan
http://msdn.microsoft.com/library/ja/default.asp?url=/library/ja/jpsysinf/html/Toppage_SystemInformation.asp
MSDN
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/commctls/userex/functions/drawthemebackground.asp
方法が見つかりません。

ご存知の方、よろしくお願いします。

【39731】Re:ウィンドウズXPの画面のデザイン
質問  漂流民  - 06/6/29(木) 23:34 -

引用なし
パスワード
   >MSDN
>http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/commctls/userex/functions/drawthemebackground.asp
>方法が見つかりません。

リンクミスしていました、
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/sysinfo/base/system_information_functions.asp

よろしくお願いします。

【41024】Re:ウィンドウズXPの画面のデザイン
お礼  漂流民  - 06/7/27(木) 22:04 -

引用なし
パスワード
   その後も折をみて調べてみましたが、解決しませんでした。
お考え頂いた皆様ありがとうございました。

7132 / 13645 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free