Jakiś problem?

Konwersja PDFa do DOCa

1. W ADobe Acrobat zapisz plik wybierając format DOC

2. W MS Word otwórz plik i usuń wszystkie ramki korzystając z makra:

Sub RemoveFrames()
Dim i As Long
Dim myRange As Range
Set myRange = Selection.Sections(1).Range
With myRange
For i = .Frames.Count To 1 Step -1
.Frames(i).Delete
Next
End With
Set myRange = Nothing
End Sub
3. Pola tekstowe, jeśli są, zamień na ramki i usuń ramki jak w pkt 2.

Dodaj komentarz

Twój adres e-mail nie zostanie opublikowany. Wymagane pola są oznaczone *