vba - VBA のフォームを使用してデータを検索および編集する

Question

更新 - 以下に示すようなフォームがあります。フォームは、コンボボックスのリストに入力できます。また、適切なユーザー名に添付されたメモを見つけることもできます。ただし、苦労している同じセルを更新する必要があります。Siddharth Rout の (コメントを参照) .find コードを使用しようとしましたが、実際には理解していないか、シートに適用する方法がわかりません。

リストにデータを入力するために、次を使用しました

Private Sub UserForm_Activate()
    With Worksheets("Notes")
        ComboBox1.List = .Range("A1:A" & .Range("A" & .Rows.Count).End(xlUp).Row).Value
    End With
End Sub

これを投稿して以来、vba の vlookup 関数を使用して、ユーザー名に添付されたメモを見つけることができました。以下のコードを使用します。

    Sub CallNotes()

the_value = ComboBox1.Text

If TextBox2 = "" Then
TextBox2 = "No Notes Applied."
Else
TextBox2 = Application.WorksheetFunction.VLookup(the_value, Worksheets("Notes").Range("A:B"), 2, False)
End If
End Sub

私が今直面している主な問題は、メモを更新することです。コメントボタンがクリックされるとすぐに、ユーザー名を探してテキストボックスの内容をユーザー名の隣のセルに貼り付けるコードが必要です。

vlookup で試してみましたが、最終的に失敗しました。それ以来、コードを削除しましたが、どのように実行しようとしたかを正確に思い出せず、元に戻すことができません。基本的に、vlookupプロセス全体を逆にしようとしました。

すべてのコメントとアドバイスは大歓迎です。