eKsiążki
https://forum.eksiazki.org/

Konwersja pdf na epub
https://forum.eksiazki.org/software-i-hardware-f24/konwersja-pdf-na-epub-t14069-15.html		 Strona 2 z 3
Autor:  Kirek50 [ 19 gru 2013 21:35:42 ]
Tytuł:  Re: Konwersja pdf na epub
Khouri napisał(a):
Mając otwarty do edycji dokument w wordzie naciskasz alt+f11. W pole "Immediate" wklejasz polecenie
"ActiveDocument.ConvertNumbersToText" i naciskasz enter. Wracasz do dokumetu i wszystkie punktory powinny być już tekstem. U mnie działa to bezbłędnie.


Kilka minut temu też znalazłem ten sposób. Jest OK, ale muszę poeksperymentować z makrem, bo lubię wygodę... :)
Autor:  Kirek50 [ 19 gru 2013 21:42:54 ]
Tytuł:  Re: Konwersja pdf na epub
Khouri napisał(a):
Po konwersji w notatniku, wszystko zostanie zamienione na plain text więc moim zdaniem bez sensu - zostaną utracone wszystkie atrybuty tekstu (boldy, kursywa).


Prawda ci to, ale makrami zabawiam się po amatorsku i nie znałem tego sposobu na usunięcie pól z listowaniem. Zresztą przerabiam tylko literaturę, więc kursywa czy pogrubienia nie były wielką stratą... Teraz dopracuję to makro i będzie OK.
Autor:  Kirek50 [ 19 gru 2013 21:54:09 ]
Tytuł:  Re: Konwersja pdf na epub
Makro dopracowane. Okazało się, że wystarczy dodać do mojego ogólnego makra jak następuje:

Sub ConvertNumbersToText()
ActiveDocument.ConvertNumbersToText
End Sub
Autor:  Khouri [ 19 gru 2013 22:03:47 ]
Tytuł:  Re: Konwersja pdf na epub
Można by zrobić jakiś poradnik, bo te wszystkie nasze wzajemne rady są porozrzucane po całym forum a pytania ciągle są podobne...
Autor:  Kirek50 [ 19 gru 2013 22:30:13 ]
Tytuł:  Re: Konwersja pdf na epub
Trzeba by było stworzyć jedno dobre makro, uwzględniające maksymalną liczbę błędów po OCR i po konwersji z PDF i udostępnić je tutaj. Może pomyślę o tym w wolnych (około)świątecznych chwilach...
Autor:  Khouri [ 19 gru 2013 23:01:52 ]
Tytuł:  Re: Konwersja pdf na epub
Kirek50 napisał(a):
Trzeba by było stworzyć jedno dobre makro, uwzględniające maksymalną liczbę błędów po OCR i po konwersji z PDF i udostępnić je tutaj. Może pomyślę o tym w wolnych (około)świątecznych chwilach...


To nie jest dobry pomysł. Teksty po OCR są różne, lepiej stosować pewne makra po kolei. Kiedyś też robiłam hurtowo korektę, ale teraz wolę robić pewne rzeczy ostrożniej.
Autor:  Kirek50 [ 20 gru 2013 19:40:55 ]
Tytuł:  Re: Konwersja pdf na epub
Khouri napisał(a):
To nie jest dobry pomysł. Teksty po OCR są różne, lepiej stosować pewne makra po kolei. Kiedyś też robiłam hurtowo korektę, ale teraz wolę robić pewne rzeczy ostrożniej.


Myślałem oczywiście o kilku, dokładnie nazwanych i opisanych. Przyzwyczaiłem się mówić jak o jednym makro, bo w edytorze VBS, gdy w nich grzebię, wyświetlają się inline jako całość :)

Napisałeś "teksty po OCR są różna" - żywa prawda, jednak dla potrzeb dyskusji ustalmy, że piszemy o plikach PDF, które zostały przepuszczone przez ABBYY PDF Transformera i mamy wynikowy plik RTF. Transformer sporo poprawia i usuwa sporo błędów prostych aplikacji OCR.

Oczywiście bywają czasami potężnie skopane PDF, ale to raczej rzadkie zjawisko.
Autor:  pinokio1984 [ 23 gru 2013 23:50:44 ]
Tytuł:  Re: Konwersja pdf na epub
witam,naprawdę dziękuję za aż takie zainteresowanie tematem,ale czy moglibyście rozpisać kilka takich właśnie makr np do łamania wierszy jak w moim przypadku itp?myślę że wielu osobom by się to bardzo przydało.i druga sprawa ,czasem uda natrafić mi się na juz gotowy plik w formacie epub,lecz również nie są one zbyt dobrze przygotowane,i czy gdy są w takim formacie da się cos z nimi jeszcze zrobić?jeszcze jedna rzecz,w niektórych e-książkach gdy już mam je na nooku po prostu nie da rady zmienić wielkości czcionki,czym to może być spowodowane?
Autor:  Kirek50 [ 24 gru 2013 13:55:43 ]
Tytuł:  Re: Konwersja pdf na epub
pinokio1984 napisał(a):
czasem uda natrafić mi się na juz gotowy plik w formacie epub,lecz również nie są one zbyt dobrze przygotowane,i czy gdy są w takim formacie da się cos z nimi jeszcze zrobić?


Najprościej będzie skonwertować w Calibre do RTF, zrobić w Wordzie poprawki i ponownie zamienić na EPUB.
Autor:  Kirek50 [ 25 gru 2013 13:41:42 ]
Tytuł:  Re: Konwersja pdf na epub
Trochę czasu, trochę poszukiwań i okazuje się, że pola tekstowe można łatwo zamienić na tekst lub po prostu zlikwidować.
Otóż bardzo często, po konwrsjii przy pomocy ABBYY PDF Converter, w plikach RTF pojawiają się pola tekstowe z numerami stron, które zostały po skanach. Jeżeli chcemy zostawić te numery i zamienić je na tekst to: Ctrl+A, a następnie Ctrl+Shift+F9. Jeżeli chcemy je całkowicie usunąć - co jest najlepszym rozwiązaniem - to: wciskamy kombinację Alt+F9, w tym momencie mamy pokazane pola tekstowe, następnie idziemy do Edycja/Zamień, klikamy na "Znajdź", w Specjalnych wybieramy "Pole" (^d) a "Zamień" zostawiamy puste.
W ten sposób nie mammy pól tekstowych z numerami stron, ale mamy podwójny odstęp (dwa znaki akapitu), ich zamiana na jeden będzie możliwa, gdy Edycja/Zamień/Specjalne usuniemy najpierw podział sekcji, a następnie w "Znajdź" wstawiamy dwa razy znak akapitu, zaś w "Zamień" jeden znak akapitu.

Oczywiście to wszystko można zrobić za pomocą makro:
Sub Usuwanie_numerow_stron()
'
' Usuwanie_numerow_stron Makro
'
'
ActiveWindow.View.ShowFieldCodes = Not ActiveWindow.View.ShowFieldCodes
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^d"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^b"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^p^p"
.Replacement.Text = "^p"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
Autor:  pinokio1984 [ 18 sty 2014 14:55:43 ]
Tytuł:  Re: Konwersja pdf na epub
witam,no i jak tam,dałoby rade stworzyc kilka makr i wrzucic na forum?mysle ze wielu osobom by sie to przydalo.nie mam pojecia jak stworzyc dobre makro
Autor:  pinokio1984 [ 19 sty 2014 13:19:17 ]
Tytuł:  Re: Konwersja pdf na epub
aha i takie jeszcze jedno pytanko,czy da sie zrobic podglad ebooka na kompie,ale tak zeby dokladnie odzwierciedlalo jak on bedzie wygladal na czytniku?chodzi mi o to ze meczace jest np przerobka ebooka ,nastepnie wgrywanie na czytnik i dopiero wtedy widac jak on tak naprawde wyglada
Autor:  Khouri [ 19 sty 2014 13:23:06 ]
Tytuł:  Re: Konwersja pdf na epub
W calibre masz podgląd książki.
Autor:  pinokio1984 [ 19 sty 2014 14:25:25 ]
Tytuł:  Re: Konwersja pdf na epub
no tak,ale czy bedzie to identyczny wyglad tekstu jak na czytniku?wlacznie z lamaniem wierszy ,jakimis niepotrzebnymi enterami itd ?
Autor:  Khouri [ 19 sty 2014 15:45:03 ]
Tytuł:  Re: Konwersja pdf na epub
pinokio1984 napisał(a):
no tak,ale czy bedzie to identyczny wyglad tekstu jak na czytniku?wlacznie z lamaniem wierszy ,jakimis niepotrzebnymi enterami itd ?


No tak. Właśnie te rzeczy widać najlepiej - jak jest łamany tekst.
Strona 2 z 3 Wszystkie czasy w strefie UTC + 1 [czas letni (DST)]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/