|
下記箇所、私の知識では、理解できないのですが、関数として利用したいので、
FUNCTION 〜 END FUNCTION をイメージしていたのですが、使い方はどうすれば
いいのでしょうか?
icinoseさんの方法は、他のPCに移すのが面倒なので積極的には使いにくいですね。
>Public Declare Sub keybd_event Lib "user32.dll" _
> (ByVal bVirtualKey As Byte, ByVal bScanCode As Byte, _
> ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
>
>Public Declare Function MapVirtualKey Lib "user32" _
> Alias "MapVirtualKeyA" (ByVal wCode As Long, _
> ByVal wMapType As Long) As Long
>
>Const VK_DBE_HIRAGANA = &HF2
>Const KEYEVENTF_EXTENDEDKEY = &H1
>Const VK_KANJI = &H19
>Const KEYEVENTF_KEYUP = &H2
質問を改めて書きますと、欲しい関数は次のようなイメージです。
1.任意のセルAに半角で郵便番号を入力
2.任意のセルB(入力規則で日本語入力ON済み)にワークシート関数を定義して
次の手順で住所を表示
a)セルAの値をIMEの変換キーを押す前の全角に変換
b)変換キーを一度だけ押す
c)住所が表示されて、Enterキーを押す
|
|