PslProject.Export
Exports one or more string lists to a specified file. If the export functions has options, the last options set manually will be used for the export. Returns True, if the operation was successful. False indicates an error.
This function does not create translation bundles. It uses a PslTransBundle object only to collect multiple string lists for export. Use PslProject.ExportTransBundle to export a translation bundle.
Syntax
Expression.Export (Format as String, TransBundle as PslTransBundle, FileName as String, Range as Variant) as Boolean
Expression Required. Object of type PslTransList
Format Identifier of the add-in which is used for export. The add-in list in Passolo displays the identifier of each add-in. These are the add-ins that are shipped with Passolo:
"Glossary Export"
"PASSOLO Glossary Maker"
"TMX Export"
"STAR TermStar Export"
"TRADOS MultiTerm"
"TRADOS MultiTerm iX"
"PASSOLO Customizable Text Export"
"Passolo XML Export/Import"
"SDLXLIFF Export/Import"
TransBundle Translation bundle object, which contains the string lists
FileName Name of the export file
Range One of these values
expAll (default) - export all (undeleted) strings
expAllDeleted - exports all strings including the deleted strings
expDisplay - exports only displayed strings
expSelected - exports only selected strings
Example
' Creates a text export file for each language Sub main Dim prj As PslProject Set prj = PSL.ActiveProject If prj Is Nothing Then Exit Sub Dim lang As PslLanguage For Each lang In prj.Languages ' Create the translation bundle Dim bundle As PslTransBundle Set bundle = prj.PrepareTransBundle Dim trn As PslTransList dim i as Integer For i = 1 to prj.TransLists.Count set trn = prj.TransLists(i) If trn.Language Is lang Then bundle.AddTransList(trn) End If Next i ' Make filename "test<langcode>.tba/tbu" Dim filename As String filename = "c:\test\test" & lang.LangCode & ".txt" prj.Export "SDLXLIFF Export/Import", bundle, filename Next lang End Sub