Excel起動時に漢字かなモードを有効にしたい。

解決済

質問者：macchan72
質問日時：2003/01/20 15:47
回答数：2件

はじめまして。

Excel2000を使い、表を作成する時に漢字モードになっておらず、
英数字がずらっとしまいショックだったことがあります。

なので、起動時に漢字かなモードを有効にしたいのですが、
メニューのあちらこちらを見ても設定の方法がわかりませんでした。

ご存知の方がいらっしゃれば、どうぞお教えください。
マクロで可能であっても構いません。
よろしくお願いいたします。

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (2件)

ベストアンサー優先
最新から表示
回答順に表示

No.2ベストアンサー

回答者： moon00
回答日時：2003/01/20 19:26

初期設定のシートを書き換えることでできると思います。

1.新規作成で作成したシートで全部を選択し、「データ」→「入力規則」
2.入力規則ダイアログボックスで日本語入力タブ→日本語入力オン→ＯＫ
3.名前を付けて保存でファイルの種類を「テンプレート」にして
　保存先を「XLStart」とし、「Book」という名前で保存。
この場合、新規挿入したシートは日本語入力が有効になっていません。
新規挿入のシートもそうしたい場合は、
「Sheet1」だけのファイルを作成し、上記2と同じ作業をしたのち、
「Sheet」という名前で「XLStart」にテンプレートとして保存して下さい。
元の設定に戻したいときは、両方のファイルを削除すればOKです。
この方法でいろんな初期設定のファイルができます。
（文字揃えを中央にしたものとか）

Excel97だと両方うまくいくのですが、その他のVer.だとBookはうまくいくのですが、
Sheetはうまくいかないと言われたことがあるので、「自信なし」にします。

- 0
- 件

通報する

No.1

回答者： imogasi
回答日時：2003/01/20 16:58

Shhet1のA1:A30（下記で適宜変えてください）はカーソルがそこに行くと全角モードになる。

Private Sub Workbook_Open()
Worksheets("sheet1").Activate
Worksheets("sheet1").Range("a1:a30").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateInputOnly, AlertStyle:=xlValidAlertStop, Operator _
:=xlBetween
.IMEMode = xlIMEModeOn
.ShowError = True
End With
End Sub