ideapine https://blog.hatena.ne.jp/ideapine/ お水を一杯いただけますか。 https://ideapine.hatenadiary.org/ VBA EXCEL 今よく考えると、それは単に"IMEStatus=8"とすればよかった。 でも、SendKeysを使いたくてこうしたのかもしれない If IMEStatus = 4 Then SendKeys ("{kanji}") これは、日本語入力モードの時に、あるフォームを表示させた時に そのフォームがSendkeyを受けるものだった時に使っている。 フォームの呼び出しのコードに上記コードを付加して使ってる。 Sub IMEの現在の状態() 状態 = IMEStatus() MsgBox 状態 & "です", vbInformation, "ＩＭＥの現在の状態" End SubこれでIMEStatus関数… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fideapine.hatenadiary.org%2Fentry%2F20100624%2F1277373058" title="IMEステータス判断について - お水を一杯いただけますか。" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2010-06-24 18:50:58 rich https://ideapine.hatenadiary.org/entry/20100624/1277373058 1.0 100%