convert otomatis menggunakan word
1. buat macro di microsoft word 2. buka editor visual basic dan paste script ini Sub SaveAllAsPDF() Dim strFilename As String Dim strDocName As String Dim strPath As String Dim oDoc As Document Dim fDialog As FileDialog Dim intPos As Integer Set fDialog = Application.FileDialog(msoFileDialogFolderPicker) With fDialog .Title = "Select folder and click OK" .AllowMultiSelect = False .InitialView = msoFileDialogViewList If .Show <> -1 Then MsgBox "Cancelled By User", , "List Folder Contents" Exit Sub End If strPath = fDialog.SelectedItems.Item(1) If Right(strPath, 1) <> "\" Then strPath = strPath + "\" End With If Documents.Count > 0 Then Documents.Close SaveChanges:=wdPromptToSaveChanges ...