Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Barra de progresso no excel (VBA)

Discussões sobre a integração do Excel com o Banco de Dados Access

Moderador: joseA

Avatar do usuário
arthurvvm
Colaborador
Colaborador
Mensagens: 41
Registrado em: Ter Set 18, 2012 12:12 pm

Barra de progresso no excel (VBA)

Mensagem por arthurvvm »

Pessoal, boa tarde!

Como faço para inserir uma barra de progresso que vai mostrando o percentual do processamento enquanto executo uma macro que salva o arquivo?

Obrigado!


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
Lúcio Mauro da Silva
Manda bem
Manda bem
Mensagens: 134
Registrado em: Sex Set 06, 2013 2:15 pm

Re: Barra de progresso no excel (VBA)

Mensagem por Lúcio Mauro da Silva »

Arthur boa tarde.
Segue em anexo dois exemplos de barra de progresso.Para utilizá-lo no comando salvar ,utilize o comando salvar e em seguida exiba o userform desejado...
Veja se é isso que precisa.

Valeu.
Abraço.
Anexos
barra de progresso.rar
(62.94 KiB) Baixado 4566 vezes


Avatar do usuário
arthurvvm
Colaborador
Colaborador
Mensagens: 41
Registrado em: Ter Set 18, 2012 12:12 pm

Re: Barra de progresso no excel (VBA)

Mensagem por arthurvvm »

Lúcio, bom dia!

Já tinha pesquisado e achei exemplos parecidos na net, porém não soube aplicá-los no meu projeto.
Você diz: "utilize o comando salvar e em seguida exiba o userform desejado..."
Como faço isso? Segue abaixo o comando, poderia me ensinar?

Sub SALVARARQUIVO()
' SALVAR O ARQUIVO
Dim userchoice As Integer

userchoice = MsgBox("Deseja salvar as alterações realizadas?", vbYesNo + vbQuestion, "Salvar")
Select Case userchoice
Case vbNo
Exit Sub
Case Else

ThisWorkbook.Save
MsgBox "Arquivo salvo com sucesso!", vbInformation, "Salvar"
Unload frmMENU

End Select
End Sub

Obrigado!


Avatar do usuário
Lúcio Mauro da Silva
Manda bem
Manda bem
Mensagens: 134
Registrado em: Sex Set 06, 2013 2:15 pm

Re: Barra de progresso no excel (VBA)

Mensagem por Lúcio Mauro da Silva »

Arthur boa tarde.
Segue o arquivo erm anexo.
Também coloquei o comando de salvamento no evento terminate do userform.

Valeu.
Anexos
barra de progresso 2.7z
(56.29 KiB) Baixado 2853 vezes


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
arthurvvm
Colaborador
Colaborador
Mensagens: 41
Registrado em: Ter Set 18, 2012 12:12 pm

Re: Barra de progresso no excel (VBA)

Mensagem por arthurvvm »

Lúcio, muito obrigado, mas imaginava que a barra evoluísse (percentualmente) em paralelo com o andamento real do programa, o que não ocorre. Minha planilha é um pouco extensa e leva um tempo para salvar por inteiro, daí com o incremento dessa barra primeiramente ela salva, fica um tempo processando para só depois iniciar a barra de progresso.

Outra coisa, só consegui executar com sucesso apenas uma vez, agora quando executo a macro SALVARARQUIVO aparece uma tela de erro com a seguinte mensagem:
Erro em tempo de execução '401':
Não é possível mostrar formulário sem janela restrita quando um formulário de janela restrita é exibido.

Vamos na luta... se puder continuar auxiliando agradeço!
Grande Abraço!


Avatar do usuário
Lúcio Mauro da Silva
Manda bem
Manda bem
Mensagens: 134
Registrado em: Sex Set 06, 2013 2:15 pm

Re: Barra de progresso no excel (VBA)

Mensagem por Lúcio Mauro da Silva »

Arthur boa noite.
Teria como você disponibilizar uma cópia do seu programa para nós trabalharmos em cima dele?
Fica mais fácil de visualizar os eventos,e desenvolver algo para suprir.


No aguardo!


Valeu.


Avatar do usuário
arthurvvm
Colaborador
Colaborador
Mensagens: 41
Registrado em: Ter Set 18, 2012 12:12 pm

Re: Barra de progresso no excel (VBA)

Mensagem por arthurvvm »

Encaminhei para seu e-mail, tem problema?


Avatar do usuário
arthurvvm
Colaborador
Colaborador
Mensagens: 41
Registrado em: Ter Set 18, 2012 12:12 pm

Re: Barra de progresso no excel (VBA)

Mensagem por arthurvvm »

Pessoal, talvez eu não tenha me expressado corretamente, segue explicação:

Tenho uma planilha que ao ser salva demora alguns segundos para completar a operação. Gostaria saber se tem com colocar um progressbar me indicando quando terminou a operação. Exemplo: A hora que eu executar minha macro salvar entra em operação o progressbar até a planilha ser salva.

Obrigado!


Avatar do usuário
webmaster
Administrador
Mensagens: 3114
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: Barra de progresso no excel (VBA)

Mensagem por webmaster »

arthurvvm,

O próprio Excel já mostra isso na barra de status. Você só precisa deixá-la a mostra, como abaixo:
StatusBar3[1].png
StatusBar3[1].png (4.98 KiB) Exibido 27190 vezes
Abraços


Avatar do usuário
arthurvvm
Colaborador
Colaborador
Mensagens: 41
Registrado em: Ter Set 18, 2012 12:12 pm

Re: Barra de progresso no excel (VBA)

Mensagem por arthurvvm »

Pois é Tomás, mas gostaria de apresentar esse progresso com um progressbar dentro de um form.
Será que é possível, como no exemplo anexado pelo colega Lúcio Mauro.


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder