Esqueceu sua senha? Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

Procedimento Muito Lento no Form [Resolvido]

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
pedrobb
Colaborador
Colaborador
Mensagens: 58
Registrado em: Qua Jul 25, 2012 12:42 pm
Localização: Montes Claros-MG

Procedimento Muito Lento no Form [Resolvido]

Mensagem por pedrobb » Ter Nov 06, 2018 12:50 pm

Pessoal,
Uso a função abaixo para Classificar Setores Exclusivos e em Ordem Alfabética (coluna F da Planilha11).
Funciona mas é muito lento.
No frmEmpresas clique no Botão de Opção Setor.
Será que pode ser mais rápido?

Código: Selecionar todos

Private Sub SetorCombobox2()
SpeedUp
Dim Z As Integer
Dim iforsta, isista As Integer
Dim i, j As Integer
Dim stemp As String

ultimaLin = Planilha11.Cells(Rows.Count, "F").End(xlUp).Row
For Z = 2 To ultimaLin
    ComboBox2 = Planilha11.Range("F" & Z)
    If ComboBox2.ListIndex = -1 Then ComboBox2.AddItem Planilha11.Range("F" & Z)
Next Z

iforsta = 0
isista = ComboBox2.ListCount - 1

For i = iforsta To isista - 1
For j = i + 1 To isista
If ComboBox2.List(i) > ComboBox2.List(j) Then
stemp = ComboBox2.List(j)
ComboBox2.List(j) = ComboBox2.List(i)
ComboBox2.List(i) = stemp
End If
Next j
Next i
ResetConfig
End Sub
Anexos
Setor.zip
(565.46 KiB) Baixado 46 vezes
Editado pela última vez por pedrobb em Seg Dez 03, 2018 10:24 am, em um total de 1 vez.



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
LaerteB
Colaborador
Colaborador
Mensagens: 82
Registrado em: Qui Out 19, 2017 8:20 am

Re: Procedimento Muito Lento no Form

Mensagem por LaerteB » Qua Nov 07, 2018 9:11 am

Bom dia, Pedrobb.

Não entendi o que quis dizer com "muito lento", pois testei aqui clicando o option button "setor"
e apareceu os dados no listview em até 5 segundos... mas se quer reduzir mais, vamos esperar se
alguém possa ter uma outra solução...

Verifique se está com muitos arquivos abertos do Excel e de outros programas, caso estejam feche-os
e veja se isso reduz o tempo...

OBS: Quando se tem formulas grandes ou complexas é normal a planilha ficar cada vez mais lenta, conforme
aumenta os dados e tiver mais linhas... uma forma de reduzir o tempo seria tirar o máximo de formulas da planilha
e fazer códigos no formulário que as possa substitui-las..

;)

LaerteB :D


Se a dica foi útil, clique no Joinha do lado direito da mensagem (acima).
Se tiver tirado todas as suas dúvidas, por gentileza atribuir ao título do tópico: [RESOLVIDO].

pedrobb
Colaborador
Colaborador
Mensagens: 58
Registrado em: Qua Jul 25, 2012 12:42 pm
Localização: Montes Claros-MG

Re: Procedimento Muito Lento no Form

Mensagem por pedrobb » Seg Dez 03, 2018 10:23 am

Consegui........
Graças ao incrível Felipe Gualberto, no YouTube.
https://www.youtube.com/watch?v=5UzTuhJMWuQ



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

Re: Procedimento Muito Lento no Form [Resolvido]

Mensagem por webmaster » Seg Dez 03, 2018 10:48 am

Como não gostar do Felipe?

;)


Tomás
https://www.tomasvasquez.com.br/blog
https://www.tomasvasquez.com.br/cursocsharp
https://twitter.com/tomamais
Se sua dúvida foi solucionada, acrescente [RESOLVIDO] ao título.

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