When using CopyPicture in Excel with Format = xlPicture and Appearance = xlScreen, if I examine the clipboard, the following Formats are present:
xlClipboardFormatPICT (Value = 2); xlClipboardFormatLink (Value = 11).
This is the same whether I do the copy manually through the UI or use VBA.
When I use Format = xlBitmap manually, the Clipboard contains formats:
xlClipboardFormatBitmap (Value = 9); xlClipboardFormatLink (Value = 11)
Plus an unknown format with a value of 45
However, when using VBA with a format of xlBitmap, the clipboard contains the format values of 2 and 11 - The same as when Format =xlPicture. I would expect the clipboard to contain the same formats whether the CopyPicture was initiated manually or through VBA.
Is this expected behavior, a bug or some configuration setting? I'd be interested to know if anyone else can reproduce this.
Does anyone know what XlClipboardFormat value of 45 is?
Using Excel 2007 and Windows Vista. VBA version 6.5.1024
Here's the simplified code:
xlClipboardFormatPICT (Value = 2); xlClipboardFormatLink (Value = 11).
This is the same whether I do the copy manually through the UI or use VBA.
When I use Format = xlBitmap manually, the Clipboard contains formats:
xlClipboardFormatBitmap (Value = 9); xlClipboardFormatLink (Value = 11)
Plus an unknown format with a value of 45
However, when using VBA with a format of xlBitmap, the clipboard contains the format values of 2 and 11 - The same as when Format =xlPicture. I would expect the clipboard to contain the same formats whether the CopyPicture was initiated manually or through VBA.
Is this expected behavior, a bug or some configuration setting? I'd be interested to know if anyone else can reproduce this.
Does anyone know what XlClipboardFormat value of 45 is?
Using Excel 2007 and Windows Vista. VBA version 6.5.1024
Here's the simplified code:
Sub Macro1()
fmta = Application.ClipboardFormats
Range("BA53:BF61").Select
Selection.CopyPicture Appearance:=xlScreen, Format:=xlBitmap
' Use Watch window to examine the Clipboard formats-FmtA
End Sub
Regardsfmta = Application.ClipboardFormats
Range("BA53:BF61").Select
Selection.CopyPicture Appearance:=xlScreen, Format:=xlBitmap
' Use Watch window to examine the Clipboard formats-FmtA
End Sub