2019.03.16
2019.05.14

はじめに

妻のパン屋のレジは、パソコンにレジのアプリを導入して、キャッシュドローワーとレジプリンターを接続して運用しています。

しかし、お客様に向けた金額を表示するディスプレーがないので、その都度、声に出してお客様に伝えています。

お客様向けのディスプレーがあれば、お客様にも商品や金額を確認してもらえるのであったほうがいいのかなとも思います。

ディスプレーは、後程として、代わりになるものを考えてみました。

【AD】

読み上げ機能について

WINDOWSの機能に「読上げ」という機能があります。

WordやExcelで間違えがないが、パソコンに読み上げてもらって確認するときに使う機能です。

AccessはWINDOWS上で動作しているので、「読上げ」機能が使えます。

面白そうなので、この機能をレジに組み入れます。

機能の追加

次のアクションがあったときに読上げるようにVBAに記述します。

１．「商品」ボタンをクリックしたとき商品名を読み上げる。
２．お会計のとき合計金額を読み上げる。

「読み上げ」機能を設定する手順は、次のとおりです。

１．VBAエディタを開いて読み上げするモジュール（「設定」参照）にチェックを入れる。
２．商品ボタンに読み上げのコード（「設定」参照）を設定する。
３．会計ボタンをクリックしたときに読み上げのコード（「設定」参照）を設定する。

どのように読み上げるか試してみました。

しっかり、読んでいますね。

でも、ちょっとイントネーションが怪しいところもありますが・・・。

現在、この機能を有効にして、レジを運用しています。

読み上げることの良い点は、

１．レジの打ち間違えが減った。

２．お客様がレジが話したことに反応して、話題になって盛り上がる。

読み上げ機能は、耳から確認できることで、お客様にとってもいいのではなかと思います。

設定

読上げはVBAで設定します。

まずはじめに、VBEを起動し、「ツール」→「参照設定」で「Microsoft Speech Object Library」にチェックを入れます。

読上げさせるイベントに

 				Dim V As SpeechLib.SpVoice
				Set V = New SpVoice
				V.Speak [読上げる文], SVSFDefault
			

を記述してあげます。

[読上げる文]のところの文や変数などをアクションがあったときに読上げます。

【AD】