Creating Custom Button Image

So maybe the solution is to clear the clipboard after pasting your image.

Private Declare Function EmptyClipboard Lib "user32" () As Long
Private Declare Function CloseClipboard Lib "user32" () As Long
Private Declare Function OpenClipboard Lib "user32" (ByVal hWnd As Long) As Long
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Sub ClearClipboard()
    Dim lngHWnd As Long
    
    lngHWnd = FindWindow("XLMAIN", Application.Caption)
    OpenClipboard lngHWnd
    EmptyClipboard
    CloseClipboard

End Sub