LLTranslation

create #

Create a new LLTranslation from a translation worksheet

Signature:

Public Function Create(ByVal translationSheet As Worksheet) As ILLTranslation

Instance creation via VB_PredeclaredId factory pattern. Validates that the worksheet is not Nothing and that all required ListObjects are present (T_TradLLMsg, T_TradLLShapes, T_TradLLForms, Tab_Translations). T_TradLLRibbon is optional.

Parameters:

• translationSheet: Worksheet. The worksheet hosting all translation ListObjects.

Returns: ILLTranslation. A fully initialised facade.

Throws:

• ProjectError.ObjectNotInitialized When translationSheet is Nothing.
• ProjectError.ElementNotFound When a required ListObject is missing.

---

wksh #

Host translation worksheet

Signature:

Public Property Get Wksh() As Worksheet

Accessors for translation objects and the host worksheet. Returns the worksheet bound to this instance.

Returns: Worksheet. The host translation worksheet.

---

trans-object #

Scoped translation object

Signature:

Public Property Get TransObject(Optional ByVal trans As Byte = TranslationOfMessages) As ITranslationObject

Returns an ITranslationObject configured for the requested translation scope. The language code is resolved from the host workbook HiddenNames (RNG_LLLanguageCode or RNG_DictionaryLanguage depending on scope).

Parameters:

• trans: Optional Byte. TranslationScope value selecting the content scope. Defaults to TranslationOfMessages.

Returns: ITranslationObject. The translation object for the requested scope.

Throws:

• ProjectError.ElementNotFound When the requested ListObject does not exist on the host worksheet.

---

export #

Export all translation tables to an output workbook

Signature:

Public Sub Export(ByVal outputWkb As Workbook, _
                  Optional ByVal Hide As Long = xlSheetVeryHidden)

Import, export, and dictionary exchange operations. Creates or clears a worksheet in the output workbook matching the host sheet name, then exports every ListObject from the host sheet using CustomTable.Export with stacking. Applies basic formatting and sets the sheet visibility to the Hide parameter value.

Parameters:

• outputWkb: Workbook. The destination workbook.
• Hide: Optional Long. Sheet visibility after export. Defaults to xlSheetVeryHidden.

Throws:

• ProjectError.ObjectNotInitialized When outputWkb is Nothing.

---

import #

Import translation tables from another workbook

Signature:

Public Sub Import(ByVal fromWkb As Workbook)

Finds a worksheet in the source workbook matching the host sheet name. Cleans the dictionary ListObject before import. For each ListObject on the host sheet, imports data from the matching ListObject on the source sheet. Missing source tables are silently skipped.

Parameters:

• fromWkb: Workbook. The source workbook containing translation data.

---

import-dictionary #

Import dictionary translations from a raw ListObject

Signature:

Public Sub ImportDictionary(ByVal dictionaryTable As ListObject)

Overwrites the host dictionary table with data from the supplied ListObject, preserving the source column headers via keepSourceHeaders.

Parameters:

• dictionaryTable: ListObject. The source dictionary ListObject.

Throws:

• ProjectError.ObjectNotInitialized When dictionaryTable is Nothing.
• ProjectError.ElementNotFound When the host dictionary table is not found.

---

export-dictionary #

Export the dictionary table to a named worksheet

Signature:

Public Sub ExportDictionary(ByVal outputWkb As Workbook, _
                            Optional ByVal sheetName As String = "Translations", _
                            Optional ByVal Hide As Long = xlSheetVisible)

Creates or clears a worksheet in the output workbook with the given name, then exports the dictionary ListObject using CustomTable.Export. Applies formatting and sets the sheet visibility.

Parameters:

• outputWkb: Workbook. The destination workbook.
• sheetName: Optional String. Worksheet name for the export. Defaults to "Translations".
• Hide: Optional Long. Sheet visibility after export. Defaults to xlSheetVisible.

Throws:

• ProjectError.ObjectNotInitialized When outputWkb is Nothing.
• ProjectError.ElementNotFound When the host dictionary table is not found.

---

initialise-hidden-names #

Create RNG_ hidden names on a target workbook*

Signature:

Public Sub InitialiseHiddenNames(ByVal targetWkb As Workbook)

Workbook-level hidden name initialisation from translations. Translates message and sheet-name tags using the TranslationOfMessages scope, then writes each translated value as a workbook-level hidden name on the target workbook. The RNG_LLLanguage, RNG_LLLanguageCode, and RNG_DictionaryLanguage names are NOT created here as they are expected to already exist in the designer workbook HiddenNames.

Parameters:

• targetWkb: Workbook. The workbook receiving the hidden names.

Throws:

• ProjectError.ObjectNotInitialized When targetWkb is Nothing.

---

initialise-sheet-names #

Create language HiddenNames on the translation worksheet

Signature:

Public Sub InitialiseSheetNames(ByVal dictLang As String, ByVal llLang As String)

Worksheet-level HiddenNames for language codes. Creates worksheet-level HiddenNames for dictionary and interface language codes on the translation worksheet itself. These are later read by InitialiseWorkbookNames in Linelist.cls to propagate language settings to the output workbook.

Parameters:

• dictLang: String. The dictionary language code (e.g., "en").
• llLang: String. The interface language code (e.g., "fr").

---

value #

Retrieve a named configuration value from the translation worksheet

Signature:

Public Property Get Value(ByVal nameId As String) As String

Mapped value retrieval from worksheet-level HiddenNames. Returns a worksheet-level HiddenName value identified by a logical key. Supported keys: "dictlang" -> RNG_DictionaryLanguage "lllang" -> RNG_LLLanguageCode Other keys return vbNullString.

Parameters:

• nameId: String. The logical key to look up.

Returns: String. The stored value, or vbNullString if the key is unknown.

---