vba - vba Excel セルを表示しますが、式はそのままにします

Question

私はExcelでvbaを使用してユーザーインターフェイスを作成しています.6つのテキストボックスがあり、セルm10 - m16を取得し、ユーザーがm17を変更できるようにします.m17はまったく同じですが、私の問題はm17のみを表示して保持したいことです.プログラムを実行して値を変更するたびに、数式は他の 6 つのボックスの 1 つを使用します。値は変更されますが、数式は削除されます。

Private Sub nnn()

End Sub

Public Sub Frame1_Click()

End Sub

Private Sub Label12_Click()

End Sub

Private Sub Label13_Click()

End Sub

Private Sub Label5_Click()

End Sub

Private Sub Label6_Click()

End Sub

Private Sub TextBox12_Change()

End Sub

Private Sub TextBox3_Change()

End Sub

Private Sub TextBox15_Change()

End Sub

Private Sub UserForm_Click()

End Sub

Private Sub UserForm_Initialize()
TextBox15.Text = ThisWorkbook.Sheets("Sheet1").Range("F10").Value
End Sub

これは私のコードですが、このタラのセルを割り当てません。Excel ビュー プロパティ内のビジュアル エディターで右クリックして text_box4 に割り当て、controlsource として入力します。

Answer 1

.ControlSourceテキストボックスのプロパティを使用して値を取得しているように感じます。

このような場合、セルが上書きされるのを防ぐことはできません。テキスト ボックスに入力する最良の方法は、UserForm_InitializeイベントまたはイベントCommandButton1_Clickに入力することです。

Private Sub UserForm_Initialize()
    TextBox1.Text = ThisWorkbook.Sheets("Sheet1").Range("A1").Value
End Sub

また

Private Sub CommandButton1_Click()
    TextBox1.Text = ThisWorkbook.Sheets("Sheet1").Range("A1").Value
End Sub

Answer 2

使用する

.Formula

それよりも

.Value

セルに書き込むとき