Mover imágenes de fondo de comentarios a celdas (Microsoft Excel)
Francois tiene un montón de comentarios en una hoja de trabajo, y cada comentario contiene una imagen como fondo. Le gustaría eliminar esas imágenes de fondo de los comentarios y colocarlas, en su lugar, como gráficos en las celdas justo a la derecha de donde se encuentran los comentarios.
La única forma de hacerlo es con la ayuda de una macro. La razón es que no puede seleccionar y copiar manualmente ningún gráfico que se haya almacenado en el fondo de un comentario. Puede, en una macro, «agarrar» aproximado
la imagen:
Sub CommentPictures() Dim cmt As Comment Dim rCell As Range Dim bVisible As Boolean For Each cmt In ActiveSheet.Comments With cmt bVisible = .Visible .Visible = True Set rCell = .Parent.Offset(0, 1) .Shape.CopyPicture _ Appearance:=xlScreen, Format:=xlPicture rCell.PasteSpecial Selection.ShapeRange.LockAspectRatio = msoFalse Selection.Width = rCell.Width Selection.Height = rCell.Height .Visible = bVisible .Shape.Fill.OneColorGradient msoGradientFromCenter, 1, 1 End With Next cmt End Sub
La macro recorre cada comentario en la hoja de trabajo activa. El comentario completo (incluido el fondo) se copia como un gráfico en el Portapapeles y luego se pega en la celda deseada. El fondo del comentario se establece con un relleno diferente en lugar del gráfico.
Debe tener en cuenta que este enfoque proporciona solo una aproximación de capturar la imagen de fondo. También, al copiar todo el comentario como gráfico, copia cualquier texto contenido en el comentario.
_Nota: _
Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.
link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador]
.
ExcelTips es su fuente de formación rentable en Microsoft Excel.
Este consejo (11165) se aplica a Microsoft Excel 2007 y 2010. Puede encontrar una versión de este consejo para la interfaz de menú anterior de Excel aquí:
link: / excel-Moving_Comment_Background_Pictures_to_Cells [Moviendo las imágenes de fondo del comentario a las celdas]
.