diff --git a/Redaction/Clean.xba b/Redaction/Clean.xba index 8957aef..630f6cc 100644 --- a/Redaction/Clean.xba +++ b/Redaction/Clean.xba @@ -1,6 +1,6 @@ -Sub mark51 +Sub mark53 End Sub diff --git a/Redaction/Translations.xba b/Redaction/Translations.xba index 1c444df..37a3e7b 100644 --- a/Redaction/Translations.xba +++ b/Redaction/Translations.xba @@ -9,6 +9,15 @@ Function getTranslation(identifier As String) As String Case "ru" getTranslation = getRussian(identifier) Exit Function + Case "sr" + getTranslation = getSerbian(identifier) + Exit Function + Case "hr" + getTranslation = getCroatian(identifier) + Exit Function + Case "bs" + getTranslation = getBosnian(identifier) + Exit Function Case Else getTranslation = getEnglish(identifier) Exit Function @@ -378,5 +387,548 @@ Function getEnglish(identifier As String) As String End Select End Function +Function getCroatian(identifier As String) As String + Select Case identifier + Case "noFileWithStylesFound" + getCroatian = "Datoteka šablona koja sadrži stilove za učitavanje u dokument nije navedena. " & chr(10) &"Možete izabrati novi šablon na računaru. " & chr(10) & "Ako datoteka šablona nije izabrana, ovaj korak čišćenja će se preskočiti." + Exit Function + Case "startQuietCleaningDescription" + getCroatian = "Da li želite da počnete sa čišćenjem dokumenta?" & chr(10) & "Ovde možete da odredite i novu datoteku šablona." & chr(10) & "Stilovi iz šablona biće učitani u dokument." + Exit Function + Case "buttonYes" + getCroatian = "Da" + Exit Function + Case "quietStartCleaningTitle" + getCroatian = "Potvrda pokretanja čišćenja" + Exit Function + Case "noStylesFileDialogTitle" + getCroatian = "Šablon sa stilovima nije pronađen" + Exit Function + Case "buttonTemplateNotFoundSkip" + getCroatian = "Nastavite" + Exit Function + Case "buttonStop" + getCroatian = "Ne" + Exit Function + Case "buttonLoad" + getCroatian = "Navedite predložak" + Exit Function + Case "buttonNameToSelectFileWithStyles" + getCroatian = "Navedite datoteku" + Exit Function + Case "cleaningFinished" + getCroatian = "Čišćenje je završeno" + Exit Function + Case "advancedMenuDialogTitle" + getCroatian = "Čišćenje u stručnom režimu" + Exit Function + Case "buttonCancel" + getCroatian = "Otkazivanje" + Exit Function + Case "buttonOK" + getCroatian = "Lansiranje" + Exit Function + Case "advancedMenuRemoveBasic" + getCroatian = "Izbrišite makronaredbe iz datoteke" + Exit Function + Case "advancedMenuRemoveManualPageBreaks" + getCroatian = "Brisanje ručnih preloma stranica" + Exit Function + Case "advancedMenuLoadStandardStyles" + getCroatian = "Učitajte stilove iz predloška" + Exit Function + Case "advancedMenuRemovePageStyles" + getCroatian = "Izbrišite prilagođene stilove stranice" + Exit Function + Case "advancedMenuRemoveInitPageBreak" + getCroatian = "Uklonite prelom stranice na početku dokumenta" + Exit Function + Case "advancedMenuFixMistakes" + getCroatian = "Popravi najčešće greške" + Exit Function + Case "advancedMenuConfigAnchors" + getCroatian = "Postavite vezivanje slika za elektronske publikacije" + Exit Function + Case "advancedMenuConfigTables" + getCroatian = "Prilagodite tabele za elektronske publikacije" + Exit Function + Case "advancedMenuRemoveBookmarks" + getCroatian = "Uklonite obeleživače" + Exit Function + Case "advancedMenuRemoveLinks" + getCroatian = "Ukloni veze" + Exit Function + Case "advancedMenuRemoveUnusedStyles" + getCroatian = "Izbrišite nekorišćene stilove" + Exit Function + Case "advancedMenuReplaceWhiteBackground" + getCroatian = "Zamenite belu pozadinu simbola na transparentan" + Exit Function + Case "advancedMenuCleanFormatting" + getCroatian = "Jasno formatiranje" + Exit Function + Case "advancedMenuSymbolsConversion" + getCroatian = "Pretvorite znakove da biste ciljali besplatne fontove" + Exit Function + Case "advancedMenuReplaceFontsInStyles" + getCroatian = "Zamenite fontove u stilovima" + Exit Function + Case "statusStarted" + getCroatian = "Počelo je čišćenje dokumenata, čekaj" + Exit Function + Case "statusReplaceFontsInStyles" + getCroatian = "Zamenite fontove u stilovima" + Exit Function + Case "statusConvertSymbolsInTargetFonts" + getCroatian = "Pretvaranje znakova u ciljne fontove" + Exit Function + Case "statusCleaningManualFormatting" + getCroatian = "Čistimo ručno formatiranje" + Exit Function + Case "statusLoadingStylesFromTemplate" + getCroatian = "Učitavanje stilova iz šablona" + Exit Function + Case "statusRemoveCustomPageStyles" + getCroatian = "Izbrišite prilagođene stilove stranice" + Exit Function + Case "statusRemovePageBreakAtStart" + getCroatian = "Izbrišite prekid stranice ako je naveden na početku dokumenta" + Exit Function + Case "statusFixFrequentMistakes" + getCroatian = "Ispravljamo najčešće greške" + Exit Function + Case "statusConfigureImagesAnchors" + getCroatian = "Prilagođavamo vezivanje slike" + Exit Function + Case "statusConfigureTables" + getCroatian = "Prilagođavamo tabele" + Exit Function + Case "statusRemoveLinks" + getCroatian = "Uklonite hiperveze" + Exit Function + Case "statusRemoveBookmarks" + getCroatian = "Uklonite obeleživače" + Exit Function + Case "statusReplaceWhiteBackground" + getCroatian = "Zamenite belu pozadinu simbola na transparentan" + Exit Function + Case "statusRemovedUnusedStyles" + getCroatian = "Izbrišite nekorišćene stilove" + Exit Function + Case "validationSuccess" + getCroatian = "Dokument je uspešno prošao inspekciju. " & chr(10) & "Nisu pronađeni problemi" + Exit Function + Case "validationWarning" + getCroatian = "Svi pronađeni primedbe moraju biti ispravljeni pre objavljivanja dokumenta." + Exit Function + Case "validationBadSymbolsNotification" + getCroatian = "U tekstu su pronađeni ne prikladni karaktera. " & chr(10) & "Sada ćete dobiti lista odlomaka teksta sa sličnim znakovima" + Exit Function + Case "validationBadDrawings" + getCroatian = "U dokumentu se nalaze crteži (" + Exit Function + Case "validationBadEmbeededObjects" + getCroatian = "Dokument sadrži ugrađene objekte. (" + Exit Function + Case "validationExcerptNotSuitable" + getCroatian = "), neprikladan za objavljivanje." + Exit Function + Case "validateFootnotes1" + getCroatian = "Simbol" + Exit Function + Case "validateFootnotes2" + getCroatian = "u fusnoti (apsolutni broj)" + Exit Function + Case "validateFootnotes3" + getCroatian = "nije pogodno za objavljivanje" + Exit Function + Case "validateNumberingsReportFonts" + getCroatian = "U sledećim listama brojeva pronađeni su fontovi" + Exit Function + Case "validateNumberingsReportSymbols" + getCroatian = "Nevažeći znak je naveden kao marker u sledećim listama brojevima" + Exit Function + Case "validateNumberingLevel" + getCroatian = "Nivo" + Exit Function + Case "validateNumberingFont" + getCroatian = "font" + Exit Function + Case "validateNumberingSymbol" + getCroatian = "simbol" + Exit Function + Case "dialogConfigComplexity" + getCroatian = "Omogućite ekspertski režim" + Exit Function + Case "dialogConfigTitle" + getCroatian = "Podešavanje čišćenja i provjere" + Exit Function + Case Else + getCroatian = "No translation" + End Select +End Function + +Function getSerbian(identifier As String) As String + Select Case identifier + Case "noFileWithStylesFound" + getSerbian = "Датотека шаблона која садржи стилове за учитавање у документ није наведена." & chr(10) &"Можете изабрати нови šablon на рачунару. " & chr(10) & "Ако датотека шаблона није изабрана, овај корак чишћења ће се прескочити." + Exit Function + Case "startQuietCleaningDescription" + getSerbian = "Да ли желите да почнете са чишћењем документа?" & chr(10) & "Овде можете да одредите и нову датотеку шаблона." & chr(10) & "Стилови из шаблона биће учитани у документ." + Exit Function + Case "buttonYes" + getSerbian = "Да" + Exit Function + Case "quietStartCleaningTitle" + getSerbian = "Потврда покретања чишћења" + Exit Function + Case "noStylesFileDialogTitle" + getSerbian = "Šablon са стиловима није пронађен" + Exit Function + Case "buttonTemplateNotFoundSkip" + getSerbian = "Наставите" + Exit Function + Case "buttonStop" + getSerbian = "Не" + Exit Function + Case "buttonLoad" + getSerbian = "Наведите предложак" + Exit Function + Case "buttonNameToSelectFileWithStyles" + getSerbian = "Наведите датотеку" + Exit Function + Case "cleaningFinished" + getSerbian = "Чишћење је завршено" + Exit Function + Case "advancedMenuDialogTitle" + getSerbian = "Чишћење у стручном режиму" + Exit Function + Case "buttonCancel" + getSerbian = "Отказивање" + Exit Function + Case "buttonOK" + getSerbian = "Лансирање" + Exit Function + Case "advancedMenuRemoveBasic" + getSerbian = "Избришите макронаредбе из датотеке" + Exit Function + Case "advancedMenuRemoveManualPageBreaks" + getSerbian = "Брисање ручних прелома страница" + Exit Function + Case "advancedMenuLoadStandardStyles" + getSerbian = "Учитајте стилове из предлошка" + Exit Function + Case "advancedMenuRemovePageStyles" + getSerbian = "Избришите прилагођене стилове странице" + Exit Function + Case "advancedMenuRemoveInitPageBreak" + getSerbian = "Уклоните прелом странице на почетку документа" + Exit Function + Case "advancedMenuFixMistakes" + getSerbian = "Поправи најчешће грешке" + Exit Function + Case "advancedMenuConfigAnchors" + getSerbian = "Поставите везивање слика за електронске публикације" + Exit Function + Case "advancedMenuConfigTables" + getSerbian = "Прилагодите табеле за електронске публикације" + Exit Function + Case "advancedMenuRemoveBookmarks" + getSerbian = "Уклоните обележиваче" + Exit Function + Case "advancedMenuRemoveLinks" + getSerbian = "Уклони везе" + Exit Function + Case "advancedMenuRemoveUnusedStyles" + getSerbian = "Избришите некоришћене стилове" + Exit Function + Case "advancedMenuReplaceWhiteBackground" + getSerbian = "Замените белу позадину симбола на транспарентан" + Exit Function + Case "advancedMenuCleanFormatting" + getSerbian = "Јасно форматирање" + Exit Function + Case "advancedMenuSymbolsConversion" + getSerbian = "Претворите знакове да бисте циљали бесплатне фонтове" + Exit Function + Case "advancedMenuReplaceFontsInStyles" + getSerbian = "Замените фонтове у стиловима" + Exit Function + Case "statusStarted" + getSerbian = "Почело је чишћење докумената, чекај" + Exit Function + Case "statusReplaceFontsInStyles" + getSerbian = "Замените фонтове у стиловима" + Exit Function + Case "statusConvertSymbolsInTargetFonts" + getSerbian = "Претварање знакова у циљне фонтове" + Exit Function + Case "statusCleaningManualFormatting" + getSerbian = "Чистимо ручно форматирање" + Exit Function + Case "statusLoadingStylesFromTemplate" + getSerbian = "Учитавање стилова из шаблона" + Exit Function + Case "statusRemoveCustomPageStyles" + getSerbian = "Избришите прилагођене стилове странице" + Exit Function + Case "statusRemovePageBreakAtStart" + getSerbian = "Избришите прекид странице ако је наведен на почетку документа" + Exit Function + Case "statusFixFrequentMistakes" + getSerbian = "Исправљамо најчешће грешке" + Exit Function + Case "statusConfigureImagesAnchors" + getSerbian = "Прилагођавамо везивање слике" + Exit Function + Case "statusConfigureTables" + getSerbian = "Прилагођавамо табеле" + Exit Function + Case "statusRemoveLinks" + getSerbian = "Уклоните хипервезе" + Exit Function + Case "statusRemoveBookmarks" + getSerbian = "Уклоните обележиваче" + Exit Function + Case "statusReplaceWhiteBackground" + getSerbian = "Замените белу позадину симбола на транспарентан" + Exit Function + Case "statusRemovedUnusedStyles" + getSerbian = "Избришите некоришћене стилове" + Exit Function + Case "validationSuccess" + getSerbian = "Документ је успешно прошао инспекцију. " & chr(10) & "Нису пронађени проблеми" + Exit Function + Case "validationWarning" + getSerbian = "Сви пронађени примедбе морају бити исправљени пре објављивања документа." + Exit Function + Case "validationBadSymbolsNotification" + getSerbian = "У тексту су пронађени не прикладни карактера. " & chr(10) & "Сада ћете добити листа одломака текста са сличним знаковима " + Exit Function + Case "validationBadDrawings" + getSerbian = "У документу се налазе цртежи (" + Exit Function + Case "validationBadEmbeededObjects" + getSerbian = "Документ садржи уграђене објекте. (" + Exit Function + Case "validationExcerptNotSuitable" + getSerbian = "), неприкладан за објављивање." + Exit Function + Case "validateFootnotes1" + getSerbian = "Симбол" + Exit Function + Case "validateFootnotes2" + getSerbian = "у фусноти (апсолутни број)" + Exit Function + Case "validateFootnotes3" + getSerbian = "није погодно за објављивање" + Exit Function + Case "validateNumberingsReportFonts" + getSerbian = "У следећим листама бројева пронађени су фонтови" + Exit Function + Case "validateNumberingsReportSymbols" + getSerbian = "Неважећи знак је наведен као маркер у следећим листама бројевима" + Exit Function + Case "validateNumberingLevel" + getSerbian = "Ниво" + Exit Function + Case "validateNumberingFont" + getSerbian = "фонт" + Exit Function + Case "validateNumberingSymbol" + getSerbian = "симбол" + Exit Function + Case "dialogConfigComplexity" + getSerbian = "Омогућите експертски режим" + Exit Function + Case "dialogConfigTitle" + getSerbian = "Подешавање чишћења и провере" + Exit Function + Case Else + getSerbian = "No translation" + End Select +End Function + +Function getBosnian(identifier As String) As String + Select Case identifier + Case "noFileWithStylesFound" + getBosnian = "Datoteka predloška koja sadrži stilove za učitavanje u dokument nije navedena." & chr(10) &" Na računaru možete odabrati novi predložak. " & chr(10) &"Ako datoteka predloška nije odabrana, ovaj korak čišćenja će se preskočiti." + Exit Function + Case "startQuietCleaningDescription" + getBosnian = "Želite li započeti s čišćenjem dokumenta?" & chr(10) & "Ovdje možete odrediti i novu datoteku predloška." & chr(10) & "Stilovi iz predloška bit će učitani u dokument." + Exit Function + Case "buttonYes" + getBosnian = "Da" + Exit Function + Case "quietStartCleaningTitle" + getBosnian = "Potvrda čišćenja" + Exit Function + Case "noStylesFileDialogTitle" + getBosnian = "Datoteka predloška nije pronađena" + Exit Function + Case "buttonTemplateNotFoundSkip" + getBosnian = "Nastavite" + Exit Function + Case "buttonStop" + getBosnian = "Ne" + Exit Function + Case "buttonLoad" + getBosnian = "Navedite predložak" + Exit Function + Case "buttonNameToSelectFileWithStyles" + getBosnian = "Navedite datoteku" + Exit Function + Case "cleaningFinished" + getBosnian = "Čišćenje je završeno" + Exit Function + Case "advancedMenuDialogTitle" + getBosnian = "Čišćenje u stručnom režimu" + Exit Function + Case "buttonCancel" + getBosnian = "Otkazivanje" + Exit Function + Case "buttonOK" + getBosnian = "Lansiranje" + Exit Function + Case "advancedMenuRemoveBasic" + getBosnian = "Izbrišite makronaredbe iz datoteke" + Exit Function + Case "advancedMenuRemoveManualPageBreaks" + getBosnian = "Brisanje ručnih prijeloma stranica" + Exit Function + Case "advancedMenuLoadStandardStyles" + getBosnian = "Učitajte stilove iz predloška" + Exit Function + Case "advancedMenuRemovePageStyles" + getBosnian = "Brisanje prilagođenih stilova stranice" + Exit Function + Case "advancedMenuRemoveInitPageBreak" + getBosnian = "Uklonite prijelom stranice na početku dokumenta" + Exit Function + Case "advancedMenuFixMistakes" + getBosnian = "Uklonite česte greške" + Exit Function + Case "advancedMenuConfigAnchors" + getBosnian = "Postavljanje vezivanja slika za elektroničke publikacije" + Exit Function + Case "advancedMenuConfigTables" + getBosnian = "Postavljanje tablica za elektroničke publikacije" + Exit Function + Case "advancedMenuRemoveBookmarks" + getBosnian = "Uklonite obilježivače" + Exit Function + Case "advancedMenuRemoveLinks" + getBosnian = "Uklonite veze" + Exit Function + Case "advancedMenuRemoveUnusedStyles" + getBosnian = "Izbrišite nekorištene stilove" + Exit Function + Case "advancedMenuReplaceWhiteBackground" + getBosnian = "Zamijenite bijelu pozadinu simbola providnom" + Exit Function + Case "advancedMenuCleanFormatting" + getBosnian = "Jasno formatiranje" + Exit Function + Case "advancedMenuSymbolsConversion" + getBosnian = "Pretvorite znakove da biste ciljali besplatne fontove" + Exit Function + Case "advancedMenuReplaceFontsInStyles" + getBosnian = "Zamijenite fontove u stilovima" + Exit Function + Case "statusStarted" + getBosnian = "Počelo je čišćenje dokumenata, pričekajte" + Exit Function + Case "statusReplaceFontsInStyles" + getBosnian = "Zamijenite fontove u stilovima" + Exit Function + Case "statusConvertSymbolsInTargetFonts" + getBosnian = "Pretvaranje znakova u ciljne fontove" + Exit Function + Case "statusCleaningManualFormatting" + getBosnian = "Čistimo ručno formatiranje" + Exit Function + Case "statusLoadingStylesFromTemplate" + getBosnian = "Učitavanje stilova iz predložaka" + Exit Function + Case "statusRemoveCustomPageStyles" + getBosnian = "Brisanje prilagođenih stilova stranice" + Exit Function + Case "statusRemovePageBreakAtStart" + getBosnian = "Izbrišite prekid stranice ako je naveden na početku dokumenta" + Exit Function + Case "statusFixFrequentMistakes" + getBosnian = "Ispravljamo najčešće greške" + Exit Function + Case "statusConfigureImagesAnchors" + getBosnian = "Prilagođavamo uvezivanje slike" + Exit Function + Case "statusConfigureTables" + getBosnian = "Prilagođavamo tabele" + Exit Function + Case "statusRemoveLinks" + getBosnian = "Uklonite hiperveze" + Exit Function + Case "statusRemoveBookmarks" + getBosnian = "Uklonite obilježivače" + Exit Function + Case "statusReplaceWhiteBackground" + getBosnian = "Zamijenite bijelu pozadinu simbola providnom" + Exit Function + Case "statusRemovedUnusedStyles" + getBosnian = "Izbrišite nekorištene stilove" + Exit Function + Case "validationSuccess" + getBosnian = "Dokument je uspješno prošao provjeru valjanosti.. " & chr(10) & "Nisu pronađeni problemi" + Exit Function + Case "validationWarning" + getBosnian = "Svi pronađeni primedbe moraju biti ispravljeni prije objavljivanja dokumenta." + Exit Function + Case "validationBadSymbolsNotification" + getBosnian = "U tekstu su pronađeni neprikladni znakovi." & chr(10) & "Sada ćete dobiti listu isječaka teksta sa sličnim znakovima" + Exit Function + Case "validationBadDrawings" + getBosnian = "Dokument sadrži crteže (" + Exit Function + Case "validationBadEmbeededObjects" + getBosnian = "Dokument sadrži ugrađene objekte. (" + Exit Function + Case "validationExcerptNotSuitable" + getBosnian = "), neprikladan za objavljivanje." + Exit Function + Case "validateFootnotes1" + getBosnian = "Simbol" + Exit Function + Case "validateFootnotes2" + getBosnian = "u fusnoti (apsolutni broj)" + Exit Function + Case "validateFootnotes3" + getBosnian = "nije pogodno za objavljivanje" + Exit Function + Case "validateNumberingsReportFonts" + getBosnian = "U sledećim listama brojeva pronađeni su fontovi" + Exit Function + Case "validateNumberingsReportSymbols" + getBosnian = "Nevažeći znak naveden je kao marker na sljedećim listama brojeva" + Exit Function + Case "validateNumberingLevel" + getBosnian = "Nivo" + Exit Function + Case "validateNumberingFont" + getBosnian = "font" + Exit Function + Case "validateNumberingSymbol" + getBosnian = "simbol" + Exit Function + Case "dialogConfigComplexity" + getBosnian = "Omogućite ekspertski režim" + Exit Function + Case "dialogConfigTitle" + getBosnian = "Podešavanje čišćenja i provjere" + Exit Function + Case Else + getBosnian = "No translation" + End Select +End Function + \ No newline at end of file diff --git a/translations.ods b/translations.ods index 9a4757f..be5a3e2 100644 Binary files a/translations.ods and b/translations.ods differ