Escola Saberexcel VBA Estudos® – Treinamentos com Macros, Fórmulas e Funções
Planilha Excel VBA Shapes 56 deletar objeto autoforma desenho área
Com esses macros do Aplicativo Microsoft Excel VBA(Visual Basic Application), vamos aprender como deletar todos os shapes em area determinada (limitada) em determinada folha de planilha. Esse macro deleta todos os shapes existente na área (Range(A1:D20)), observem que todos os exemplos faço o possível para repor a condição inicial para que o Desenvolvedor/Aluno repita seu testes com mais facilidades. Fiquem com Deus, Expedito Marcondes.
Sub sbx_deletar_shapes_area()
For Each s In ActiveSheet.Shapes
If Not Intersect(s.TopLeftCell, Range(“$A$1:$D$20”)) Is Nothing Then
s.Delete
End If
Next s
[e1].Value = “”
End Sub
‘// COPIAR PARA P TESTE
Sub sbx_copiar_teste()
If Cells(1, “e”).Value = “” Then ‘para nao copiar duas vezes
[a].Copy [b]
[e1].Value = 1
Else
MsgBox (“area para teste já copiada!,execute o macro Deletar!”), vbCritical, “Escola Saberexcel VBA Estudos®”
Exit Sub
End If
End Sub
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Escola SaberExcel VBA Estudos® – Treinamentos com Macros, Fórmulas e Funções.
Compre pelo PagSeguro | Compre pelo PayPal | |
Material Didático: Curso Excel VBA Expert |
Baixe o exemplo de planilha contendo os macros acima: |
Planilha Excel VBA Shapes 56 deletar shapes área |
<< Verifique em seu email: Itens Excluídos, se o Download não estiver na Caixa de Entrada >> |
Planilha Excel VBA Shapes 56 deletar shapes área