Help with code

Remove the linked cell from the text box.

Sheet content changed event set to run LaunchSheetChanged.

Create a button on the Launch sheet and set it to run TextBoxButton.

You could possibly map TextBoxButton to the Text box text modified or changed event but I think a separate button might be more obvious to the user. The text box changed event only seemed to run after selecting outside of the text box.

Below are only copying text box to the end of the table, and updating one text box from a cell that would have your vlookup.

Sub TextBoxButton( oEvent As Object )

	Dim oDoc As Object
	Dim oControls As Object
	Dim oTextBox As Object
	Dim sText As String
	Dim oSheet As Object
	Dim iLastRow As Long

	oDoc = ThisComponent
	oSheet = oDoc.Sheets.getByName( "Recipes" )

	oControls = oEvent.Source.Model.Parent

	iLastRow = ubound(oSheet.Data) + 1

	oTextBox = oControls.getByName( "Text Box 3" )
	sText = oTextBox.Text
	oSheet.getCellByPosition( 3, iLastRow ).String = sText
End Sub

Sub LaunchSheetChanged( oEvent As Object )

	Dim oDoc As Object
	Dim oControls As Object
	Dim oTextBox As Object
	Dim sText As String
	Dim oSheet As Object

	oDoc = ThisComponent
	oSheet = oDoc.Sheets.getByName( "Launch" )

	oControls = oSheet.DrawPage.Forms.GetByName( "Form" )

	sText = oSheet.getCellByPosition( 23, 7 ).String
	oTextBox = oControls.getByName( "Text Box 3" )
	oTextBox.Text = sText
End Sub