e8933g

e8933g

 Cataluña, España @e8933g desde - visto

Actividad pública reciente

Ha valorado "Buena" la respuesta

Catalogo imágenes excel

respondió: Tal vez te pueda servir este código que me encontré. Sub selShapesOnSht() Dim shp As Shape For Each shp In ActiveWorkbook.ActiveSheet.Shapes ans = MsgBox("Borrar Imangen " & Chr(10) & shp.Name & " " & shp.TopLeftCell.Address & _ Chr(10) & " -- " &...