スクリプトによる Excel のスペル チェック オプションの制御

関連リンク • オートコレクト オプション • 入力オートフォーマット オプション • ブラウザ オプション • 計算方法オプション • グラフ オプション • 編集オプション • エンコード オプション • エラー チェック オプション • ファイル オプション • 全般オプション • 全般オプション (Web) • インターナショナル オプション • 図オプション • 自動保存オプション • セキュリティ オプション • セキュリティ (詳細) オプション • スマート タグ オプション • 移行オプション • 表示オプション

ダイアログ ボックスと Excel オブジェクト モデルの対応

以下に示すスクリプトの中で参照されているオプションは、[オプション] ダイアログ ボックスの [スペル チェック] タブにあるオプションに対応します。Microsoft Excel 2003 でこれらのオプションにアクセスするには、[ツール] メニューの [オプション] をクリックし、[スペル チェック] タブをクリックします。このダイアログ ボックスで使用可能なオプションと Microsoft Excel オブジェクト モデルの対応を下の図に示します。図の文字が読み取れない場合は、ここをクリックして拡大表示してください。

ここに示すスクリプトは、Microsoft Excel 2003 を使用してテストを行いました。少なくともいくつかの機能は、Visual Basic for Applications (VBA) をサポートしている Microsoft Excel のすべてのバージョンで動作します。ただし、その他のバージョンでは、テストは行われていません。

ページのトップへ

値を取得するためのサンプル コード

Microsoft Excel 2003 の [オプション] ダイアログ ボックスにある [スペル チェック] タブの設定情報を取得するサンプル スクリプトです。

Set objExcel = CreateObject("Excel.Application")

Wscript.Echo "Dictionary language: " & objExcel.SpellingOptions.DictLang
Wscript.Echo "Add words to:: " & objExcel.SpellingOptions.UserDict
Wscript.Echo "Suggest from main dictionary only: " & _
    objExcel.SpellingOptions.SuggestMainOnly
Wscript.Echo "Ignore words in uppercase: " & _
    objExcel.SpellingOptions.IgnoreCaps
Wscript.Echo "Ignore words with numbers: " & _
    objExcel.SpellingOptions.IgnoreMixedDigits
Wscript.Echo "Ignore Internet and file addresses: " & _
    objExcel.SpellingOptions.IgnoreFileNames
Wscript.Echo "German: Use post-reform rules: " & _
    objExcel.SpellingOptions.GermanPostReform
Wscript.Echo "Korean: Combine aux verb/adjectives: " & _
    objExcel.SpellingOptions.KoreanCombineAux
Wscript.Echo "Korean: Search misused word list: " & _
    objExcel.SpellingOptions.KoreanUseAutoChangeList
Wscript.Echo "Korean: Process compound nouns: " & _
    objExcel.SpellingOptions.KoreanProcessCompound
Wscript.Echo "Hebrew modes: " & objExcel.SpellingOptions.HebrewModes
Wscript.Echo "Arabic modes: " & objExcel.SpellingOptions.ArabicModes

objExcel.Quit

ページのトップへ

値を変更するためのサンプル コード

メイン辞書だけで見つかる単語を使用してスペルの修正候補を表示するように Excel を設定するサンプル スクリプトです。

Set objExcel = CreateObject("Excel.Application")

objExcel.SpellingOptions.SuggestMainOnly = TRUE

objExcel.Quit

ページのトップへ

本サンプル スクリプトは Microsoft の標準サポート プログラムまたはサービスではサポートされていません。このサンプル コードは何等保障もない現状有姿のままで提供されます。さらに、Microsoft は、商品性、特定目的への適合性を含む一切の黙示の保証をいたしかねます。本サンプル スクリプトおよびドキュメントの使用または性能に起因するすべてのリスクは、お客様が負うものとします。Microsoft、本サンプル スクリプトの作成者、および本スクリプトの作成、製造、配布に関与する者は、いかなる場合においても、本サンプル スクリプトおよびドキュメントの使用または使用不能から生じる損害 (逸失利益、事業の中断、事業情報の喪失またはその他の金銭的損失を含みますがこれらに限定されません) に関して一切責任を負いません。たとえ、Microsoft がこのような損害の可能性について知らされていた場合でも同様です。

ページのトップへ