Type Info:
OriginalSourceLanguage As String
Dim Lang As ProjectLanguage Dim OriginalLang As String OriginalLang = Application.ActiveProject.ProjectLanguages.OriginalSourceLanguage