下記のような中身で Excelのvbaを作成したんですが。。。 スクショはとれますが、なぜか一つ前のものを記憶しています。
下記のような中身で Excelのvbaを作成したんですが。。。 スクショはとれますが、なぜか一つ前のものを記憶しています。 今、撮影したものを貼り付けたいのですが、どうすればよろしいでしょうか？ よろしくお願いします。 '64bit版 Private Declare PtrSafe Sub keybd_event Lib "user32" ( _ ByVal bVk As Byte, _ ByVal bScan As Byte, _ ByVal dwFlags As Long, _ ByVal dwExtraInfo As Long _ ) '32bit版 'Private Declare Sub keybd_event Lib "user32" ( _ ByVal bVk As Byte, _ ByVal bScan As Byte, _ ByVal dwFlags As Long, _ ByVal dwExtraInfo As Long _ ) Public Sub 全体を撮る() keybd_event vbKeySnapshot, 0&, &H1, 0& keybd_event vbKeySnapshot, 0&, &H1 Or &H2, 0& ActiveSheet.Paste End Sub
Excel | Visual Basic・160閲覧・50
ベストアンサー
試してないけど DoEvent と 待ち時間を入れる必要があるのではないでしょうか？ そのスクショ処理が完了する前に貼り付けてる 可能性がありそうな。
1人がナイス！しています
質問者からのお礼コメント
良い勉強をするきっかけになったので、選ばせていただきました
お礼日時：2020/11/21 20:11
