いつもお世話になっております。
次のようなコードを書いているのですが、Win2000だとクリップボードが貼り付けされるのですが、WinNT4.0だとされません。
ある文字をクリップボードにコピーして、アプリケーションを表示させて、そこにコントロール+「V」でペーストさせています。
解決方法がわかるかた、よろしくお願いします。
Private Sub Command1_Click()
Clipboard.Clear
Clipboard.SetText "あああ"
AppActivate ("貼り付けをしたいアプリケーション")
SendKeys ("^{v}")
End Sub
自分のシステムでは貼り付けられますよ。
アプリケーションは
AppActivate ”Microsoft Word”
にしてみました。
システムは
NT4+VB5+Word97 です。
sendkeys(clipboard.gettext)
にしたら行けました。
sendkeysって、全角アリなんですね。
ツイート | ![]() |