當編輯框內容改變，對應的單元格也隨著改變

復制代碼 代碼如下:

Private Sub TextBox1_Change()
ThisWorkbook.ActiveSheet.Range("J1") = TextBox1.Text
End Sub

利用這個代碼可以寫很多自動計算的Excel小模塊了