Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #58 da revista programar. Faz já o download aqui!

pedro_guerreiro

Ajuda programação VBA

Mensagens Recomendadas

pedro_guerreiro    0
pedro_guerreiro

Boas pessoal estou com um projecto de final de curso em mãos e calhou me o projecto em que tenho de programar em VBA onde não mexo nisto á anos e precisava de uma ajuda.

Então é o seguinte, tenho uma tabela com dados com o formato de data/horas e preciso programar no VBA

onde ao inserir o valor de N(t) irá cálcular uma nova variavel "TR" em horas [TR = ( DA-DP+HA-HP)*24] alguém me consegue ajudar?

Cumprimentos

N(t)_DP ____HP____DA_____HA__

*0 0 0 12-5-01 13:30

*1 12-5-01 15:15 12-5-01 17:00

*2 12-5-01 20:00 13-5-01 16:25

*3 13-5-01 18:20 13-5-01 19:15

*4 13-5-01 20:50 13-5-01 23:00

*5 16-5-01 16:30 16-5-01 21:00

Editado por pedro_guerreiro

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
acao    19
acao

boas, tens que amostrar o que tens feito, qual é o ide, etc. resumindo ninguém faz o trabalho por ti, apenas ajudas. cumps acao

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
americomaiam@gmail.com    0
americomaiam@gmail.com

Imagina uma tabela com 2 colunas e duas linhas.

No VBA abrir o editor e inserir um formulário>inserir duas caixas de texto (TxtHora e TxtMinuto) >inserir um botão. Clicar duas vezes no botão e escrever:


Private Sub cmndSalvar_Click()
Range("A1").Select
Do
   If Not (IsEmpty(ActiveCell)) Then
   ActiveCell.Offset(1, 0).Select
   End If
Loop Until IsEmpty(ActiveCell) = True

ActiveCell.Offset(0, 1).Value =TxtHora.Text
ActiveCell.Offset(0, 2).Value = TxtMinuto.Text
End Sub

No final é só executar.

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade. Este site usa cookies para disponibilizar funcionalidades personalizadas. Para mais informações visite esta página.