NamedRange.CopyPicture(XlPictureAppearance, XlCopyPictureFormat) Método
Definição
Importante
Algumas informações se referem a produtos de pré-lançamento que podem ser substancialmente modificados antes do lançamento. A Microsoft não oferece garantias, expressas ou implícitas, das informações aqui fornecidas.
Copia o controle do NamedRange para a Área de transferência como uma imagem.
public object CopyPicture (Microsoft.Office.Interop.Excel.XlPictureAppearance Appearance = Microsoft.Office.Interop.Excel.XlPictureAppearance.xlScreen, Microsoft.Office.Interop.Excel.XlCopyPictureFormat Format = Microsoft.Office.Interop.Excel.XlCopyPictureFormat.xlPicture);
abstract member CopyPicture : Microsoft.Office.Interop.Excel.XlPictureAppearance * Microsoft.Office.Interop.Excel.XlCopyPictureFormat -> obj
Public Function CopyPicture (Optional Appearance As XlPictureAppearance = Microsoft.Office.Interop.Excel.XlPictureAppearance.xlScreen, Optional Format As XlCopyPictureFormat = Microsoft.Office.Interop.Excel.XlCopyPictureFormat.xlPicture) As Object
Parâmetros
- Appearance
- XlPictureAppearance
Especifica como a imagem deve ser copiada. Pode ser uma das seguintes XlPictureAppearance constantes: xlPrinterxlScreen
- Format
- XlCopyPictureFormat
O formato da imagem. Pode ser uma das seguintes XlCopyPictureFormat constantes: xlBitmapxlPicture
Retornos
Exemplos
O exemplo de código a seguir cria um NamedRange e o preenche com a palavra Smith. Em seguida, ele usa o CopyPicture método para copiar para NamedRange a Área de Transferência como um bitmap.
Este exemplo destina-se a uma personalização no nível de documento.
Microsoft.Office.Tools.Excel.NamedRange copyBitmapRange;
private void CopyAsBitmap()
{
copyBitmapRange = this.Controls.AddNamedRange(
this.Range["C3"], "copyBitmapRange");
this.copyBitmapRange.Value2 = "Smith";
this.copyBitmapRange.CopyPicture(
Excel.XlPictureAppearance.xlScreen,
Excel.XlCopyPictureFormat.xlBitmap);
}
Private copyBitmapRange As Microsoft.Office.Tools.Excel.NamedRange
Private Sub CopyAsBitmap()
copyBitmapRange = Me.Controls.AddNamedRange( _
Me.Range("C3"), "copyBitmapRange")
Me.copyBitmapRange.Value2 = "Smith"
Me.copyBitmapRange.CopyPicture( _
Excel.XlPictureAppearance.xlScreen, _
Excel.XlCopyPictureFormat.xlBitmap)
End Sub
Comentários
Parâmetros Opcionais
Para obter informações sobre parâmetros opcionais, consulte Parâmetros opcionais em soluções do Office.