エクセルVBAでーザーフォーム上のテキストフィールドのスクロールバーが表示されない

Question

エクセルVBAでユーザーフォーム上にテキストフィールドを設置しました。
そして、下記を設定してスクロールバーを有効にしました。

TextBox1.MultiLine = True         '複数行を許可
TextBox1.EnterKeyBehavior = True  '改行をEnterキーのみで行う
TextBox1.WordWrap = False         '文字列の折り返しを行わない
TextBox1.ScrollBars = fmScrollBarsBoth  '水平・垂直スクロールバーともに表示

呼び出し時は、下記を記述しました。

Text1.SelStart = 0
Text1.SelText = "ああああああああああ"

これでスクロールバーが表示されるかと思ったのですが、マウスで選択してやらないと表示されません。
どこが間違っているのでしょうか。

Comments

[ShinjiKozuka]

テキストボックスの上下左右余白を設定していませんか？余白を全て0に変更してみてください。

Answer 1

上記の分だけを記述するとスクロールバーが表示されました。
別のコードの部分が影響しているのかもしれません。

有難うございました。

Comments

[uer03108]

デフォルトでフォーカスしている場合は、スクロールバーが表示されるようですが、
非アクティブにした時点で、バーは非表示になりました。