I have tryed a lot. This is the one I am working with right now. It is giving me error 5941.

Private Sub LPja_Click()
If ActiveDocument.FormFields("LPja").CheckBox.Value = True Then
' Vis tabellen
ActiveDocument.Bookmarks("TabelLP").Range.Font.Hid den = False
Else
' Skjul tabellen
ActiveDocument.Bookmarks("TabelLP").Range.Font.Hid den = True
End If
End Sub

I have attached the file, i hope

Attached Files

Test4.docm (66.8 KB, 9 views)