设置 Excel 中单元格的内容语言

Question

在 MS Excel 中，是否可以设置单元格的内容语言（例如每列）？其目的之一是当内容是多语言的（例如字典）时进行正确的拼写检查，就像我们在 MS Word 中所做的那样。

Answer 1

这是一个快速而简单的宏，希望您能适应您的需求。就像现在一样，它将在 上运行美式英语拼写检查Column A，然后在 上运行墨西哥西班牙语拼写检查Column B。您可以在此处找到支持的语言的代码。

Sub multilanguageSC()
Dim rngEng As Range, rngSpa As Range

'Set ranges to check for each language.
Set rngEng = ActiveSheet.Range("A:A")
Set rngSpa = ActiveSheet.Range("B:B")

'Set spelling dictionary language to English (US).
Application.SpellingOptions.DictLang = 1033
'Check spelling for designated English range.
rngEng.CheckSpelling

'Set spelling dictionary language to Spanish(Mexico).
Application.SpellingOptions.DictLang = 2058
'Check spelling for designated Spanish range.
rngSpa.CheckSpelling

'Set spelling dictionary back to default setting.
Application.SpellingOptions.DictLang = Application.LanguageSettings.LanguageID(msoLanguageIDUI)

End Sub