VBA テキストボックス内の文字列を切り出したい

フォームのテキストボックスに入力した文字列の一文字目だけを
切り出し、変数に格納したいのですが、
切り出す作業がどうしてもできません。

よろしくお願い致します。

No.1 ベストアンサー 回答者： zap35 回答日時： 2007/02/02 05:44

こういうことですか？

Dim wk As String
wk = Left(UserForm1.TextBox1.Text, 1)
MsgBox(wk)

それとも、マクロを「どこに記述すればよいか」というご質問でしょうか
それであればForm画面右クリック→コードの表示で開く画面です
Private Sub TextBox1_Change()
　MsgBox (Left(UserForm1.TextBox1.Text, 1))
End Sub

この回答へのお礼

ご回答ありがとうございました。

まさに上記の記述のことでした。
Left(TextBox1, 1)
で記述してたので、できませんでした。

本当にありがとうございました。

お礼日時：2007/02/02 17:15