Hi yall.
I'm sitting here getting a bit frustrated, as i usually do, when i'm sitting with this codes that doesnt work for me.
The pop up loads, but i get an error message, as attached images tells.
Private Sub CommandButton1_Click()
With ActiveDocument
.Bookmarks("bmKursdato").Range ("TextBox1")
.InsertBefore TextBox1
.Bookmarks("bmKursklokke").Range ("TextBox2")
.InsertBefore TextBox2
.Bookmarks("bmTamed").Range ("TextBox3")
.InsertBefore TextBox3
End With
UserForm1.hide
End Sub
Where do i do the wrong code?
Thank you




Reply With Quote
