[[20180518155346]]　『質問です、宜しくお願いします。』（エクセル勉強中）　ページの最後に飛ぶ

『質問です、宜しくお願いします。』（エクセル勉強中）

Private Sub CommandButton1_Click()
TextBox1.SelStart = 0
TextBox1.SelLength = 4
TextBox1.SelText = "あいうえお"
End Sub
※TEXTプロパティに値を入れて置く

SelStartとSelLength有：TEXTプロパテイの値＋SelText
SelStartとSelLength無：SelText
選択の上書きで消されたという事？ですか

＜使用 Excel：Excel2007、使用 OS：Windows8 ＞

 >選択の上書きで消されたという事？ですか
 でしょうね...　多分^^;

 試しに
    Private Sub CommandButton1_Click()
        TextBox1.HideSelection = False   '←追加
        TextBox1.SelStart = 0
        TextBox1.SelLength = 4
    '    TextBox1.SelText = "あいうえお" '←コメントアウト
    End Sub

 この状態でCommandButton1_Clickすると
 元々あったTextの先頭から4文字が選択されて反転している事が確認できると思います。

（白茶） 2018/05/18(金) 17:16

白茶さんありがとうございます

それにしてもHideSelectionはSetFocusと同じように動くのですね
勉強になりました
（エクセル勉強中） 2018/05/18(金) 20:02

コメント返信：

[ 一覧(最新更新順) ]

[[20180518155346]] 『質問です、宜しくお願いします。』（エクセル勉強中） ページの最後に飛ぶ

[[20180518155346]]　『質問です、宜しくお願いします。』（エクセル勉強中）　ページの最後に飛ぶ