VBA中如何清空“剪切板”.

zhuyiwen

Private Declare Function OpenClipboard Lib "user32" (ByVal hWnd As Long) As Long

Private Declare Function CloseClipboard Lib "user32" () As Long

Private Declare Function EmptyClipboard Lib "user32" () As Long

Public Sub JustEmptyClipboard()

    OpenClipboard (0)

    EmptyClipboard

    CloseClipboard

End Sub

对ACCESS的VBA也就应该有效吧

zhuyiwen

ACCESS的APPLICATION没有: Application.CutCopyMode