Views

Important:

Quaisquer necessidades de soluções e/ou desenvolvimento de aplicações pessoais/profissionais, que não constem neste Blog podem ser tratados como consultoria freelance à parte.

...

11 de fevereiro de 2013

VBA Excel - Apague todos os gráficos da Planilha - Delete all charts on worksheet




Sim, às vezes, para tornar as nossas planilhas mais leves, precisamos, antes de fechá-las e gravá-la, deletar todos os gráficos nela contidos. É lógico que isso só deve ser feito quando existem rotinas que garantem a criação automática dos mesmos.

Sub DelAllCharts()

Dim shp  As Shape

' Mude o nome da Planilha.
For Each shp In Sheets("nSheet").Shapes

    If shp.Type = msoChart Then
        shp.Delete
    End If

Next

End Sub

Tags: VBA, populando, combo box, formulário, form, control, controle


Nenhum comentário:

Postar um comentário

eBooks VBA na AMAZOM.com.br

Vitrine