文章でテキストボックスの入力を使用する

Question

私は情報を入力する特定のテキストボックスを持っており、テキストボックスの情報を使って文章を完成させたいと思います。

例：ボブには_____の費用がかかる_____の自転車がありました。空白は、それらの特定のテキストボックスに記入されたもので完了します。私の「コピー」ボタンをクリックすると一緒に来るでしょう。

私はこれまでにしか得られませんでした。静かにして空白を埋めるだけの言葉が必要です。

Private Sub CommandButton2_Click() 

    If (Value1 = True) Then 
     ActiveSheet.Range("A1").Copy 
     textBox2.Text = textBox1.Text 
    End If 

End Sub 

Answer 1

ユーザフォームのテキストボックスは、メソッドとして参照できます。

あなたのテキストボックスが「TextBox1テキストボックス」と「TextBox2を」と命名されているのであれば、その後、あなたがそれらを参照することができます

Me.Textbox1 
Me.Textbox2 

'Can only be used within the userform code only; to use the names _ 
    elsewhere, you'll need to save them to a variable 

あなたは.value

Me.Textbox2.Value = Me.Textbox1.Value 

でテキストボックス内のテキストを変更することができます

テキストボックスの名前の代わりに変数を使用する必要がある場合は、.Controlsメソッド：

Dim textboxName As String 
textboxName = "Textbox1" 

Me.Controls(textboxName) = "New value" 

範囲の内容は、ユーザーフォーム上に渡され、その後、変数に保存することができます。

savedText = ws.Range("A1").Value 
Me.Textbox1.Value = savedText 

・ホープ、このことができます！