Escola Saberexcel VBA Estudos® – Treinamentos com Macros, Fórmulas e Funções
Planilha Excel VBA Shapes 34 porcentagem progressiva Com este Macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), aprenderemos como inserir uma porcentagem progressiva na autoforma(Shapes).
SHAPES PORCENTAGEM PROGRESSIVA
‘//=========’ Para criar um shapes com porcentagem progressiva: 1 – Crie um Shapes (Caixa de Texto) -((autoforma)) 2 – Selecione o Shapes vá na caixa de Nomes (Ao Lado da caixa de Fórmulas) e Renomeie o Shapes e tecle Enter 3 – Renomeie para o mesmo nome que esta no macro. 4 – Pronto. (neste caso Renomeei o Shapes “Porcentagem”) só executar o macro.
‘//=========’
Sub sbx_porcentagem_progressiva()
n = 80
Saber1.Shapes(“info”).TextFrame.Characters.Text = “UM MOMENTO …. CALCULANDO…..”
Saber1.Shapes(“info”).Fill.ForeColor.RGB = RGB(243, 151, 153)
For i = 1 To n
DoEvents
For j = 1 To 100000
Next j
Saber1.Shapes(“Porcentagem”).TextFrame.Characters.Text = Format(i / n, “0%”)
Next i
Saber1.Shapes(“info”).TextFrame.Characters.Text = “PRONTO…….!”
Saber1.Shapes(“info”).Fill.ForeColor.RGB = RGB(212, 255, 91)
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 34 porcentagem progressiva |
[email-download-link namefield=”YES” id=”96″] |
Planilha Excel VBA Shapes 34 porcentagem progressiva