ativar vba timer com checkbox em list box

Visual Basic for Aplication e macros no Excel.
Regras do fórum
Sua dúvida foi respondida? Marque como RESOLVIDO em seus tópicos, usando o botão com marca verde. Imagem

ativar vba timer com checkbox em list box

Mensagempor denisw » Sex Dez 29, 2017 11:06 am

Ola amigos.
Criei um timer com botão individual para cada linha do excel . mudei isso para um listbox com loop no chekbox. se checkbox true ele deveria enviar uma msgbox a cada x minutos como aviso de que assunto continua pendente. Porem o loop não funciona. Anexo base de teste ( a rotina indvidual funciona na imagem relogio da planilha exemplo mod4)
Abaixo mod3 "testea1timer:
Código: Selecionar todos
Dim i As Long
    With ListBox1
        For i = .ListCount - 1 To 0 Step -1 'AQUI DA ERRO
            If .Selected(i) Then
                Dim sac1 As VbMsgBoxResult
Dim tempo As String
sac1 = MsgBox("A nf da linha" & i & ListBox1.List(ListBox1.ListIndex, 0) & "foi resolvida?", vbYesNo, AVISO)
tempo = "00:00:10"
If sac1 = vbNo Then
MsgBox "A mensagem aparecerá novamente em " & tempo & " segundos"
Application.OnTime DateTime.Now + TimeValue(tempo), "testea1timer"
                             
            End If
            Exit Sub
            End If
        Next i
       
End With

End Sub
Você não está autorizado a ver ou baixar esse anexo.
Editado pela última vez por wagner em Sex Dez 29, 2017 11:36 am, em um total de 1 vez.
Razão: Códigos VBA devem ser inseridos com a TAG CODE existente no início da caixa de mensagens.
denisw
Membro
Membro
 
Mensagens: 65
Registrado em: Qui Dez 26, 2013 1:24 pm
Has thanked: 22 times
Have thanks: 3 times

{ SO_SELECT }

Re: ativar vba timer com checkbox em list box

Mensagempor klarc28 » Sex Dez 29, 2017 11:19 am

Favor testar os anexos. Se resolveu, favor marcar como resolvido.
Quando quiser agradecer, clique no joinha. Marque como resolvido na parte que resolveu sua dúvida.
klarc28
Membro
Membro
 
Mensagens: 840
Registrado em: Sáb Dez 09, 2017 12:33 am
Has thanked: 18 times
Have thanks: 340 times

Re: ativar vba timer com checkbox em list box

Mensagempor denisw » Sex Dez 29, 2017 11:27 am

Obrigado. vou testar
denisw
Membro
Membro
 
Mensagens: 65
Registrado em: Qui Dez 26, 2013 1:24 pm
Has thanked: 22 times
Have thanks: 3 times

Re: ativar vba timer com checkbox em list box

Mensagempor klarc28 » Sex Dez 29, 2017 11:28 am

Favor testar os anexos. Se resolveu, favor marcar como resolvido.
Quando quiser agradecer, clique no joinha. Marque como resolvido na parte que resolveu sua dúvida.
klarc28
Membro
Membro
 
Mensagens: 840
Registrado em: Sáb Dez 09, 2017 12:33 am
Has thanked: 18 times
Have thanks: 340 times

Re: ativar vba timer com checkbox em list box

Mensagempor klarc28 » Sex Dez 29, 2017 11:29 am

Favor testar os anexos. Se resolveu, favor marcar como resolvido.
Quando quiser agradecer, clique no joinha. Marque como resolvido na parte que resolveu sua dúvida.
klarc28
Membro
Membro
 
Mensagens: 840
Registrado em: Sáb Dez 09, 2017 12:33 am
Has thanked: 18 times
Have thanks: 340 times

Re: ativar vba timer com checkbox em list box

Mensagempor klarc28 » Sex Dez 29, 2017 11:32 am

Favor testar os anexos. Se resolveu, favor marcar como resolvido.
Quando quiser agradecer, clique no joinha. Marque como resolvido na parte que resolveu sua dúvida.
klarc28
Membro
Membro
 
Mensagens: 840
Registrado em: Sáb Dez 09, 2017 12:33 am
Has thanked: 18 times
Have thanks: 340 times

Re: ativar vba timer com checkbox em list box

Mensagempor wagner » Sex Dez 29, 2017 11:38 am

denisw,

Solicitamos, por gentileza utilizar a ferramenta CODE quando postar códigos VBA aqui no fórum.
Se a resposta foi útil para você, por gentileza, Amigo, clique na mãozinha ao lado direito da ferramenta CITAR, no canto superior direito.

Atenciosamente
Wagner Morel
Avatar do usuário
wagner
Moderador
Moderador
 
Mensagens: 3590
Registrado em: Sáb Out 20, 2012 12:49 pm
Localização: Fortaleza - CE
Has thanked: 62 times
Have thanks: 1554 times

Re: ativar vba timer com checkbox em list box

Mensagempor denisw » Sex Dez 29, 2017 2:31 pm

Vou testar ainda hoje! respondo
denisw
Membro
Membro
 
Mensagens: 65
Registrado em: Qui Dez 26, 2013 1:24 pm
Has thanked: 22 times
Have thanks: 3 times

Re: ativar vba timer com checkbox em list box

Mensagempor denisw » Sex Dez 29, 2017 2:58 pm

Houve um problema , o loop grava somente o ultimo checkbox marcado. como é multi, ele deveria percorrer o tempo ( no real sera 15min) pra cada numero lançado. ou seja quando lançar o x as 13h as 13:15 abriria msgbox " o " x " foi resolvido ?, o y lançado as 13:05 abriria a msg box as 13:20h o "y" foi resolvido. E mesmo q o loop funcione da forma que está ele reinciaria o timer pra todos. Por isso acho q tenho que mudar o projeto para o loop percorrer o horario de entrada ( colum B).
denisw
Membro
Membro
 
Mensagens: 65
Registrado em: Qui Dez 26, 2013 1:24 pm
Has thanked: 22 times
Have thanks: 3 times

Re: ativar vba timer com checkbox em list box

Mensagempor klarc28 » Sex Dez 29, 2017 3:28 pm

Favor testar os anexos. Se resolveu, favor marcar como resolvido.
Você não está autorizado a ver ou baixar esse anexo.
Quando quiser agradecer, clique no joinha. Marque como resolvido na parte que resolveu sua dúvida.
klarc28
Membro
Membro
 
Mensagens: 840
Registrado em: Sáb Dez 09, 2017 12:33 am
Has thanked: 18 times
Have thanks: 340 times

Próximo

Voltar para VBA & Macros

Quem está online

Usuários navegando neste fórum: Google [Bot] e 1 visitante