0

マクロを使うのが今日で２日目です。
エクセルの左上、セルＡ１に数字の１０以上が入ったら「声で１０以上」と読み上げて欲しいです。
hirosukesueさんのご回答を得て、とにかくやってみましたが、大方分かってきま したが、まだ読み上げてはくれません。
お手数ですが、助けてください。
音声読み上げは完了しました。なぜだか外人男性の英語ですが、これはどうでも良いことです。
もしかしたら、１０以上も「over 10」としないといけないのかも知れませんが、、

現在のマクロは下記の通りです。
（Ｇｅｎｅｒａｌ）　▼　（Ｄｅｃｌａｒａｔｉｏｎｓ）
～～～～～～～～～～～～～～～～～～
1・エクセル画面で「Alt」キーと「F11」キーを同時押しする→
2・表示されたＶＢＥ画面のツールバーの「挿入」→「標準モジュール」
3・表示された右蘭の白紙の部分に次の1行のコードをコピペする

Public A(2) As Double
～～～～～～～～～～～～～～～～～～～～～～～～～
Ｗｏｒｋｓｈｅｅｔ　▼　ＳｅｌｅｃｔｉｏｎＣｈａｎｇｅ
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
A(1) = Range("C1").Value
If A(1) <> A(2) And A(1) > 9 Then
Application.Speech.Speak "じゅういじょうです"
End If
A(2) = A(1)
End Sub
～～～～～～～～～～～～～～～～～～～～～～～～～～～～
5・エクセル画面の下方の「Sheet1」タブを右クリック→「コードの表示」
6・ここでも表示された白紙の部分に次の7行のコードをコピペする

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
A(1) = Range("C1").Value
If A(1) <> A(2) And A(1) > 9 Then
Application.Speech.Speak "じゅうイじょうです"
End If
A(2) = A(1)
End Sub
～～～～～～～～～～～～～～～～～～～～
この状態でＡ１に手打ちで１４とか１６とかの１０より大きな数字を打っても何も起きません。
読み上げてくれません。
どこが、間違っているでしょうか？

hirosukesueさんの回答http://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q1111438876

質問者が選んだベストソリューション

Yahoo!知恵袋 6244日前