Unload Me einfügen in VBA

[DavidHans]

Hallo zusammen,

ich habe ein wahrscheinlich sehr einfach zu lösendes Problem:

Ich habe ein Userform mit mehreren Buttons. Nun möchte ich, dass einer dieser Buttons eine Updatefunktion erfüllt (klappt schon) und zusätzlich das Userform schließt. Ich weiß, dass das ganze mit dem Code Unload Me funktioniert... Ich weiß nur leider nicht genau, wie ich ihn einbaue. (Tut mir leid, ich bin völliger Neuling in Sachen VBA)

Hier mein Code:

Code:

Private Sub CommandButton4_Click()
    Dim i As Integer
    Dim rngFound2 As Range
    With Sheets("Master")
        For i = 1 To 35
            .Cells(rngFound.Row, i) = Controls("TextBox" & i).Text
        Next
    End With
    With Sheets("Projekt X")
        Set rngFound2 = .Columns(1).Find(TextBox1.Text, _
                                        LookIn:=xlValues, _
                                        lookat:=xlWhole)
        
        For i = 1 To 35
            .Cells(rngFound2.Row, i) = Controls("TextBox" & i).Text
        Next
    End With
End Sub

Ich würde mich riesig freuen, wenn mir hier jemand weiterhelfen könnte!

Danke und mit besten Grüßen,
David

[Crazy Tom]

Hi

das Unload Me passt genau eine Zeile vor End Sub

MfG Tom

[DavidHans]

Super, hat geklappt :)
Vielen Dank!