|
■No74966 (めいっと さん) に返信
> 張り付きます。
「貼り付け」表記が一般的です。
> メモ帳をアクティブにして実行すると、クリップボードに入っているテキストが張り付きます。
> Excelのシートをアクティブにして、セルをアクティブにして実行しても張り付きません。
当方では貼れました。アクティブウィンドウの切り替えが追いついていないのではありませんか?
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
MsgBox("OKを押した2秒後に、「アクティブなウィンドウ」に Ctrl+V を送出します。")
Timer1.Interval = 2000
Timer1.Start()
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Timer1.Stop()
SendKeys.Send("^v")
End Sub
End Class
|