VocExcel（単語帳） / VBA Tips
　
　[Key]　エクセル / Excel / VBA /マクロ


<--- 戻る

テキストボックスの値をループ処理で削除

サンプルファイル


Private Sub CommandButton1_Click()


Dim i As Long

'-----------------------------------------
'テキストボックスの値をループ処理で削除
'[TextBox1.Text] ---> [TextBox10.Text]
'-----------------------------------------

'1,2,3---> 10

For i = 1 To 10

Controls("TextBox" & i).Text = ""

Next i



End Sub



Private Sub CommandButton1_Click()


Dim i As Long

'-----------------------------------------
'テキストボックスの値をループ処理で削除
'[TextBox01.Text] ---> [TextBox10.Text]
'-----------------------------------------

'01,02,03---> 10
For i = 1 To 10

Controls("TextBox" & Format(i, "00")).Text = ""

Next i



End Sub
--