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: 62
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: 470
Registrado em: Sáb Dez 09, 2017 12:33 am
Has thanked: 6 times
Have thanks: 160 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: 62
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: 470
Registrado em: Sáb Dez 09, 2017 12:33 am
Has thanked: 6 times
Have thanks: 160 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: 470
Registrado em: Sáb Dez 09, 2017 12:33 am
Has thanked: 6 times
Have thanks: 160 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: 470
Registrado em: Sáb Dez 09, 2017 12:33 am
Has thanked: 6 times
Have thanks: 160 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 últil para você, por gentileza, Amigo,clique na mãozinha ao lado direito da sua tela. No canto superior.

Atenciosamente
Wagner Morel
Avatar do usuário
wagner
Moderador
Moderador
 
Mensagens: 3275
Registrado em: Sáb Out 20, 2012 12:49 pm
Localização: Fortaleza - CE
Has thanked: 56 times
Have thanks: 1434 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: 62
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: 62
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: 470
Registrado em: Sáb Dez 09, 2017 12:33 am
Has thanked: 6 times
Have thanks: 160 times

Próximo

Voltar para VBA & Macros

Quem está online

Usuários navegando neste fórum: Google Adsense [Bot], klarc28, Osvaldomp, Rui Maciel e 3 visitantes