Parece possível sim. Precisamos de um modelo com seu form e listbox.
No evento click do listbox vc chamaria uma rotina que que selecionaria as células (ou linhas) na planilha ativa, e agendasse para em alguns segundos, rodar outra rotina que desselecionaria tudo.
(dá uma procurada em Application.OnTime)
No mais, fica difícil montar um modelo sem o seu modelo COMPACTADO. Nos ajude a te ajudar.
Entendendo esse código consegui remover a seleção em 3 segundos.
Dim B
Public theend As Date
Sub parartempo()
'Encerra a cronometragem
On Error Resume Next
Application.OnTime B, Procedure:="Atualiza", Schedule:=False
End Sub
Sub cometempo()
'Verifica diferença dos segundos
If Time < theend Then
'Atualiza a cada 1 segundo
Application.OnTime Now + TimeValue("00:00:01"), "Atualiza"
Else
'Chama rotina para encerrar contagem
Application.Run "parartempo"
'Fecha o Formulario
With frm_estoque
.ListBox1.ListIndex = -1
End With
End If
End Sub
Sub Atualiza()
Call cometempo
End Sub
Bt chama
Private Sub CommandButton3_Click()
Dim B
B = Time
theend = Time + TimeValue("00:00:03")
Application.Run "cometempo"
End Sub
Precisando de uma código pra selecionar A linha na ListBox.
Ex: Se a Testbox1 for igual ao item da COLUNA 0 - ZERO, então linha seleciona.
Tentar não é saber, é ter a certeza que vai descobrir
Dicas excel, vba, Access http://vbaedit.blogspot.com.br/
Postado : 11/08/2014 7:37 pm