vba - Excelで貼り付けイベントを検出する方法

Question

Excelの貼り付けコマンドを検出する必要があります。ユーザーが左マウス ボタンをクリックしてメニュー ポップアップで貼り付けをクリックしたときに通知できる回避策はありますか。これは、ユーザーが貼り付けメニュー項目をクリックした場合に手順を実行する必要があります。どんな助けでも大歓迎です。

よろしく、アミット

Answer 1

Excel VBAから借用ワークシートに何かが貼り付けられたかどうかを検出する方法。このWorkbook_SheetChangeイベントは、貼り付けを含む、ページ上のすべての変更イベントに対して発生します。

このイベント内から、元に戻すリストの履歴の最新のエントリを見て、最後の変更が貼り付けであったかどうかを確認できます。

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
  Dim lastAction As String

  ' Get the last action performed by user
  lastAction = Application.CommandBars("Standard").Controls("&Undo").List(1)

  ' Check if the last action was a paste
  If Left(lastAction, 5) = "Paste" Then

    ' Do Stuff Here

  End If
End Sub