Eu quero remover algumas fotos da minha planilha Excel - excel

Eu quero remover algumas fotos da minha planilha Excel, mas elas são muito poucas e algumas eu preciso manter ... Existe uma maneira rápida de deixar as fotos que eu quero e excluir as que eu não quero?

Respostas:

Você precisa dizer ao Excel quais imagens manter, então na coluna UMA, liste o nome das fotos que você deseja manter. Em seguida, execute esta pequena macro:

Sub PicturePerfect()
Dim s As Shape, N As Long, i As Long
Dim Keep As Boolean
N = Cells(Rows.Count, "A").End(xlUp).Row
Keep = False

For Each s In ActiveSheet.Shapes
sn = s.Name
Keep = False
For i = 1 To N
If sn = Cells(i, "A").Value Then
Keep = True
Exit For
End If
Next i
If Not Keep Then
s.Delete
End If
Next s
End Sub