Izdvojeno > Tutorijali za izradu titlova
Ripovanje hardkodiranih titlova
sabko:
Evo i macro za Word, da ne morate svaki put koristi Find & Replace:
--- Kod: ---Sub OCRani_titl()
'
' OCRani_titl Macro
'
'
Application.Browser.Previous
Selection.HomeKey Unit:=wdStory
Selection.TypeText Text:="00:00:00,000 --> 00:00:00,000"
Selection.TypeParagraph
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^m"
.Replacement.Text = "^p00:00:00,000 --> 00:00:00,000^p"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = "^p^p^p"
.Replacement.Text = "^p___^p^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
--- Kraj koda ---
Dodaje i tekst na početku i pronalazi i linije bez teksta - Tu stavlja "___".
Ovo zadnje zato što bi neki editori titlova mogli izbrisati prazne linije, pa ne bi odgovaralo spašenom timingu.
Morate omogućiti macroe u wordu, a ovo zalijepite onda u VBA unutar New Macros.
backuper:
Imam ovaj Windows i ne mogu pokrenuti posljednji VideoSubFinder x64.
Kaže da mi fale ove datoteke da bih ga pokrenuo.
Pokušao sam i verziju x86, ali isto joj fale neki fileovi. Zna li netko rješenje?
Edit: probao i verziju 3.40 za x64 i isto neće, neka je greška do Windowsa. --- ——— ---
Marin VD:
Imam VideoSubFinder 5.6 (isto se događa i sa starim verzijama) i program mi se ruši nakon 15min čitanja videa. Inače, imam Windows 10. Zna li tko kako riješiti ovaj problem?
wlaky:
--- Citat: Marin VD - 22.08.2021. 13:35:13 ---Imam VideoSubFinder 5.6 (isto se događa i sa starim verzijama) i program mi se ruši nakon 15min čitanja videa. Inače, imam Windows 10. Zna li tko kako riješiti ovaj problem?
--- Kraj citata ---
Imaš windows 10 Home, prvi put vidim da neko koristi tu verziju...
JoxerTM:
Ako se sumnja na win10, onda aplikaciju pokreni u compatibility modu sa win7.
Desni klik na aplikaciju pa Properties, a onda prema slici namjesti:
Navigacija
[0] Lista Poruka
Idi na punu verziju