How to: Modify a Picture

• Mar 20, 2024

This example uses the Shape properties to modify a picture inserted in a worksheet.

View Example

PictureActions.cs

// Set the measurement unit to Millimeter.
workbook.Unit = DevExpress.Office.DocumentUnit.Millimeter;
workbook.Worksheets.ActiveWorksheet.DefaultRowHeight = 20;
workbook.Worksheets.ActiveWorksheet.DefaultColumnWidth = 20;

workbook.BeginUpdate();
try
{
    Worksheet worksheet = workbook.Worksheets[0];
    // Insert pictures.
    Picture pic = worksheet.Pictures.AddPicture("Pictures\\x-spreadsheet.png", worksheet.Cells["A1"]);
    worksheet.Pictures.AddPicture("Pictures\\x-spreadsheet.png", worksheet.Cells["A1"]);
    // Specify picture name.
    pic.Name = "Logo";
    pic.AlternativeText = "Spreadsheet logo";
    // Move a picture.
    pic.Move(30, 50);
    // Move and size the picture with underlying cells. 
    pic.Placement = Placement.MoveAndSize;
    worksheet.Rows[1].Height += 20;
    worksheet.Columns["D"].Width += 20;
    // Move another picture to illustrate OffsetX, OffsetY properties.
    worksheet.Pictures[1].Move(pic.OffsetY, pic.OffsetX);
}
finally
{
    workbook.EndUpdate();
}

PictureActions.vb

' Set the measurement unit to Millimeter.
workbook.Unit = DevExpress.Office.DocumentUnit.Millimeter
workbook.Worksheets.ActiveWorksheet.DefaultRowHeight = 20
workbook.Worksheets.ActiveWorksheet.DefaultColumnWidth = 20

workbook.BeginUpdate()
Try
    Dim worksheet As Worksheet = workbook.Worksheets(0)
    ' Insert pictures.
    Dim pic As Picture = worksheet.Pictures.AddPicture("Pictures\x-spreadsheet.png", worksheet.Cells("A1"))
    worksheet.Pictures.AddPicture("Pictures\x-spreadsheet.png", worksheet.Cells("A1"))
    ' Specify picture name.
    pic.Name = "Logo"
    pic.AlternativeText = "Spreadsheet logo"
    ' Move a picture.
    pic.Move(30, 50)
    ' Move and size the picture with underlying cells. 
    pic.Placement = Placement.MoveAndSize
    worksheet.Rows(1).Height += 20
    worksheet.Columns("D").Width += 20
    ' Move another picture to illustrate OffsetX, OffsetY properties.
    worksheet.Pictures(1).Move(pic.OffsetY, pic.OffsetX)
Finally
    workbook.EndUpdate()
End Try