|
>>Dataobjectを使う方法です。
>>
>>
>>参照設定「Microsoft Forms 2.0 Object Library」
>>
>>Sub test()
>> Dim dto As MSForms.DataObject
>> Set dto = New MSForms.DataObject
>> dto.SetText "tetsu-kato", 1
>> dto.PutInClipboard
>> SendKeys "^v"
>> Set dto = Nothing
>>End Sub
>通常は半角英数字ですが、上記の変数の中に半角カタカナが混じっていると、IMEmodeがひらがに勝手にに変わってしまいます。半角英数のときにはうまくいくのですが、変数の中に半角カタカナが来ると上記のプログラムでもカタカナがひらがなに変換されてしまいます。解決方法を教えていただきたいと
>思います。
提示したコードは、貼付け対象がExcelのシートだと正常に作動しますよね!!
このコード、メモ帳に 例えば aaaイチノセ 等と入力し、これをコピーして
対象箇所(ノーツ?)に貼り付ける と同じです。
私は、このメーラーを持っていないので確認できませんが、
上記の操作を手動で行っても同じ結果ですか?
|
|