If Clipboard.GetFormat(vbCFBitmap) Then Call SavePicture(Clipboard.GetData(vbCFBitmap), App.Path & "\test.bmp") End If