Boa tarde!!
Nos já temos uma dúvida próxima da sua.
Use a pesquisa!!
Esse ainda não tem relação com o que vi pela ultima vez, tem mais....
viewtopic.php?f=10&t=9730
Att
Olá alexandrevba, eu olhei mas sou novato eu tentei mas não consegui, como poderia estar alualizando isso nesse código:
Call FiltrarPedidos
Call PreencherListVIEW
No lugar de ficar mudando de Planilha.
Código que muda a planilha:
Public altern As Date, i As Long
Sub AlternaPlans()
If i = 0 Then
i = 1
End If
altern = Now + TimeValue("00:00:05")
Application.OnTime altern, "AlternaPlans"
Sheets(i).Activate
If i < Sheets.Count Then
i = i + 1
Else: i = 1
End If
End Sub
Sub DeslAlterna()
On Error Resume Next
Application.OnTime earliesttime:=altern, procedure:="AlternaPlans", schedule:=False
MsgBox "desligado", vbInformation, "Status"
End Sub
Postado : 20/06/2014 2:50 pm