VBA別館・Python別館

64322

入力ボックス完成 - Tak

2018/06/07 (Thu) 20:37:49

プログラムを使う人に、入力要求するような場合に使うcodeを書きます。

使うのはvbaで用意されているいる「inputoBox」と言う関数です。

・まず入力boxをinputbox関数で作ります。
・その後入力された文字をB4セルに表示させます。

codeは実に簡単です。

変数やコマンドボタンの名称には、日本語も使えます。

------------------------

Option Explicit

Private Sub CommandButton1_Click()

 Dim 入力ボックス As String

  入力ボックス = inputBox("入力する文字を入れて下さい","入力ボックス")

  Range("B4").Value = 入力ボックス

End Sub

入力ボックス完成 - Tak

2018/06/09 (Sat) 07:52:40

① ではコマンドボックスをクリックしてみてください。

② 入力ボックスに、好きな文字を入れて下さい。

③ 出来たらOKして下さい。  

するとセルB4に、いま入力ボックスに入れた文字が表示されます。

やっていることは、書かれたcodeに従ってるだけですので、ドンドン書き換えてエラーと一緒に遊んで下さい。

名前
件名
メッセージ
画像
メールアドレス
URL
文字色
編集/削除キー (半角英数字のみで4~8文字)
プレビューする (投稿前に、内容をプレビューして確認できます)

Copyright © 1999- FC2, inc All Rights Reserved.