[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『ユーザーフォームのタイトルバーの色変更』（きたやま）
VBAでユーザーフォームを作りましたが、ユーザーフォームのタイトルバーの色を白色から青色に変更したいのですが、できません。
ネットで調べてもなかなか該当のサイトにたどり着けません。
色を変えるのは無理なのでしょうか？
＜ 使用 Excel：Excel2016、使用 OS：Windows10 ＞
スタートメニュー⇒設定（歯車のマーク）⇒個人用設定⇒色⇒タイトルバーとウィンドウの境界線
と設定をすれば変わります。
では、これをvbaから制御できるかというと……。
一応、WIN32(64)APIを使えばできると思います。
ただし、お勧めはしません。
お勧めしない理由は、難しいことに加えて、
プログラムがうまく動かなかったときの影響が「Excel」にとどまらないからです。
それを前提にしたうえで、どうしても青くしたいというのであれば、
１．Windowsの設定をVBAから変更する。
２．ユーザーフォームのタイトルバーを非表示にした上で、タイトルバーの位置に青い四角を表示させ、タイトルバーっぽく見せる。
という方法が考えられると思います。いずれもAPIを使います。
１．は当方PCで試してみたのですが、うまく動かなかったため、助言できません。
（おそらくネットで多く出回っている情報(SetSysColorを使う)はWindows10に対応していない）
２．は、当方PCで試してみて、一応タイトルバーを非表示にすることはできているので、
どうしてもということであれば、コードをお示しすることはできます。
ご希望でしたらおっしゃってください。
ただ、繰り返しになりますが、お勧めしませんし、あくまで自己責任で行うということを
強く認識したうえで実行することになるかと思います。
（DS） 2020/08/23(日) 11:20
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.