It's all pretty basic, really. Assuming companyname is either the name of a textbox on your userform or a string variable's name (you don't say what it is), your code should be:
Code:
Private Sub CommandButton1_Click()
Call UpdateBookmark("companyname", companyname)
End Sub
Then all you need do is add the UpdateBookmark sub from post #2 to your code module.