『[かな/英数字]をすべて全角になるように制限』（みどかえる）

[ひとつのセルに「かな/英数字」をすべて全角になるように制限をする方法]

 セル（例えばA3〜A10）に「富士山−Ｈ１２」といった「かな」や「英数字」を
 すべて全角で入力できるように制限したいと思っています。
 
 想像では、誤って半角や小文字で入力しちゃっても自動で全角に変換される用に
 したいのですが、自分では限界がありVBAを作ることが出来ませんでした。

 ぜひご教示下さい。
 よろしくお願い致します。
[Excel2003またはExcel2000,Windows2000]

----
 A3〜A10に入力規則を設定します。

 データ−入力規則−日本語入力、ダイアログで日本語入力モードを設定します。
      (DAI)

----
 DAIさん回答有難うございます。
 早速入力規則で行ってみました。確かに全角で入力できるようになりました！
 ですが新たな問題に気づいたのですが
 小文字を大文字に制限（もしくは変換）することは出来ませんでした。

 セル（例えばA3〜A10）に全角で、更に英字は大文字に入力限定する・・・
 （もしくは自動変換）ができるようにするにはどうすればいいのでしょうか？
 すみませんがお教えいただけますか？
 よろしくお願い致します。　　
 　　　（みどかえる）

----
 質問です。
 
 >小文字を大文字に制限（もしくは変換）することは出来ませんでした。
 >セル（例えばA3〜A10）に全角で、更に英字は大文字に入力限定する

 �@　ａ（全角英字の小文字）→Ａ（全角英字の大文字）

 �A　a（半角英字の小文字）→A（半角英字の大文字）

 �B　半角英字→全角英字

 どれを想定していますか。    (DAI)

----
説明が下手ですみません。ごめんなさい。
 はじめの質問時と内容が少し異なってしまうかもですが様は

例）→　今日は１月１日ＰＭ５：００　　　・・・・（すべて全角、大文字）
 と漢字と英数字を同じセルに入れる場合、この時人によっては
 　今日は１月１日PM５：００　　・・・（ＰＭが半角になっちゃってる）
 　今日は1月1日ＰＭ5：00　　　　・・・（数字が半角になっちゃってる）
 　今日は１月１日pm５：００　　　・・・（ＰＭが半角小文字になっちゃってる）
 　今日は１月１日ｐｍ５：００　　・・・（ＰＭが全角小文字になっちゃってる）
 って異なります。
 この時どんなに上記のようなかたちで入力をしても、自動で
 　今日は１月１日ＰＭ５：００
 とすべて全角の大文字で変換されるようにしたいのです。
 ですので
 �@　ａ（全角英字の小文字）→Ａ（全角英字の大文字）
 �A　a（半角英字の小文字）→A（半角英字の大文字）
 �B　半角英字→全角英字
 すべて対応できる形が理想です。

的確に質問できなくて本当にごめんなさい。
よろしくお願い致します。
　　　（みどかえる）

----
 「入力時に自動的に」ということですから、相当難しいと思います。
 （例えば、ＡＴＯＫみたいな変換ソフトをつくるということになると思います。）
 英数は、入力規則を設定しておいて、ＣａｐｓキーをＬｏｃｋしておけば全角大文字になると思いますが、
 入力時の変換操作でいかようにもなってしまいますから、入力時に注意するしかないと思います。
 ギブアップの(DAI)

----
 「入力時に自動的に」でなく，小文字，半角で入力しても，別セルに大文字，全角に
 する，ってことでは，マズイのですよね････　　　　　　　(...)

----
 こういうのはいかがですか？

 Private Sub Worksheet_Change(ByVal Target As Range)
 Application.EnableEvents = False
 With Target.Cells(1, 1)
    If (Len(.Text)) > 0 Then
        If IsNumeric(.Value) Or IsDate(.Value) Then
            .Value = .Text
            .NumberFormat = "@"
        End If
        txt = .Text
        .Value = StrConv(txt, vbWide)
    End If
 End With
 Application.EnableEvents = True
 End Sub
 (seiya)