O código abaixo copia uma faixa de células de uma planilha que é colada como imagem em outra planilha, mas não encontrei uma forma de salvá-la como um arquivo de imagem em uma pasta, ou mesmo selecioná-la para trabalhar com esta imagem pelo VBA.
Range("D19:H25").Select
Application.CutCopyMode = False
Selection.CopyPicture Appearance:=xlScreen, Format:=xlBitmap
Sheets("Imagem").Activate
Range("A1").Select
ActiveSheet.Paste
'a instrução Selection.CopyPicture Appearance:=xlScreen, Format:=xlBitmap
'coloca a imagem na área de transferência (imagem originada de uma faixa de células selecionadas)
'... como salvar esta imagem em uma pasta a partir da área de transferência?
'... ou como salvá-la se já estiver colada na planilha?
'... como colocar esta imagem em um objeto image, tem como?
Se esta imagem colada (que está na área de transferência) pudesse ser salva em uma pasta, mais tarde ela poderia ser lida para um objeto image do VBA.
Caso haja como pegar esta imagem da área de transferência e colocar direto em um objeto image, também resolveria, mas de qualquer forma é importante poder salvar esta imagem.
Tem como fazer isso?