VBAのListBoxから選択中の値をよむ

shuzo-kino.hateblo.jp
の続き。
初期値を出しただけじゃ使いモンにならないので、その値を活かす方法について。

実際のところ

Private Sub CommandButton1_Click()

MsgBox "You choose : " & UserForm1.ListBox1.Value & " !!"

End Sub


Private Sub UserForm_Initialize()

Dim MyArray(2)
MyArray(0) = 0
MyArray(1) = 12
MyArray(2) = 34

ListBox1.List() = MyArray

End Sub

読みだした値の加工も可能

VBの特性上、シェルスクリプトのように変数は数値としても文字列としてもブンまわせるので……
四則演算ができるし

MsgBox UserForm1.ListBox1.Value + 42

文字列の生成もいける

MsgBox "You choose : " & UserForm1.ListBox1.Value & " !!"

参考もと

【ユーザーフォーム】シートをCSVファイルで保存する：VBA | kirinote.com