Excel 2013/2010：意図しないListBoxコントロールのリサイズ

ListBoxコントロールのサイズが勝手に変わってしまうことがあります。IntegralHeightをFalseにすれば避けられると思っていたのですが、どうもそう単純ではないようなので少し試してみました。

下図はWindows 7上のExcel 2010でシートに配置したListBoxコントロールです。AddItemで項目が追加されるようになっています。これをWindows 8.1上のExcel 2013で実行すると、見た目の結果が異なりました。

IntegralHeightがTrueの場合、Windows 8.1上ではListBoxコントロールが元のサイズより大きくなってしまいました。 IntegralHeightがFalseの場合このリサイズは起こらず、代わりに中の文字が小さくなりました。

逆にWindows 8.1上のExcel 2013で同じものを作ってみると、Windows 7上のExcel 2010で実行してもこのようなことは起こりませんでした。

実際には若干サイズが変わっているようですが、冒頭の例ほど大きな違いはありません。

念のため、画面の解像度が異なる場合も見てみました。同じWindows 7上のExcel 2010でも、解像度が異なると冒頭と同じ結果になりました。8.1上の2013でも同様でした。

Windows 7（解像度：1920×1200）・Excel 2010で作成

一方、8.1上の2013で作ったものは解像度が違ってもこのようなことは起こりませんでした。また、7上の2010でも結果は同じでした。

Windows 8.1（解像度：1920×1200）・Excel 2013で作成

ExcelよりWindowsのバージョンの違いに原因があるのでしょうか。
ちなみにWindows 7上のExcel 2013で作成した場合は結果が少し異なりました。AddItemを実行する前、ActiveXコントロールをアクティブにした時点でリサイズが起こりました。

Windows 7（解像度：1920×1200）・Excel 2013で作成

これはIntegralHeightの値は関係ありませんでした。

8.1上で作成できれば問題はなさそうです。7で作成せざるを得ない場合は、AddItem実行後にHeightとWidthを設定し直すくらいしか対処法は思いつきませんでした。なんか腑に落ちませんが。