プログラムプレスエクセルVBAで入力し

Question

値は、特定のセルに設定された後、私はENTERキーをプログラム的なプレスにしようとしています

：私はExcelで私のテーブル のリフレッシュをトリガすることができるように

Private Sub TextBox1_Change() 
    If TextBox1.Text = "ALC Test" Then 
     Range("$F$2").Value = "17" 
     ActiveWorkbook.RefreshAll 
    End If 
    If TextBox1.Text = "ALC Prod" Then 
     Range("$F$2").Value = "54" 
     ActiveWorkbook.RefreshAll 
    End If 
    If TextBox1.Text = "" Then 
     Range("$F$2").Value = "" 
     ActiveWorkbook.RefreshAll 
    End If 
End Sub 

しかし、何の効果も持たない、値を変更し、「Enter」キーを押します：正しく

Answer 1

。

---

あなただけの（リフレッシュ）あなたのテーブルのデータを再計算する場合は、次の手順を実行できます：あなたの状況で

Private Sub TextBox1_Change() 

If TextBox1.Text = "ALC Test" Then 
     Range("$F$2").Value = "17" 
     Range("$F$2").Select 
     Application.SendKeys("~") 

、あなたはセルを選択する必要があります（つまり、パラメータを保持している）の前にEnterコマンドはExcelに送信されます。

Answer 2

何をされてやる仕事に縫い目することはありません。

使用

calculate 

またはそれを明確にするために、編集

activesheet.calculate 

：

sendkeysが正しい使い方

Private Sub TextBox1_Change() 
If TextBox1.Text = "ALC Test" Then 
    Range("$F$2").Value = "17" 
    calculate