Option Explicit Function Strip_Hyperlinks_Bookmarks_Fields() Dim myLink As Hyperlink Dim myBookmark As Bookmark Dim myField As Field With ActiveDocument For Each myLink In .Hyperlinks myLink.Delete Next myLink For Each myBookmark In .Bookmarks myBookmark.Delete Next myBookmark For Each myField In .Fields myField.Unlink Next myField End With End Function Sub Clean_Up_Document_for_Conversion() Call Strip_Hyperlinks_Bookmarks_Fields 'inne funkcje oczyszczajÄ…ce dokument End Sub