Export with Macro

[#1]

Hi Guys, i have a table that one of the collumns is an representation like a color

but when i use the macro:

sub Exportador

local="D:\testeqlik.jpg"

set obj=ActiveDocument.getSheetobject("CH04")

obj.ExportBitmapToFile(local)

end sub

and the image that the macro export is:

someone imagine what happens? how i can have the complete image?