Jump to content
gregurs

Macro numa tabela

Recommended Posts

gregurs

Boa noite eu estou a começar a trabalhar com vba e o meu problema é que tenho uma tabela e preciso que ele execute a macro numa coluna da tabela, falaram-me em grupo de macros mas não sei como funciona nem se é a solução

Agradeço resposta

Obrigada pela atenção

gregurs   

Share this post


Link to post
Share on other sites
FreiNando

A tabela é no Excel ou no Access?

E a macro é suposto fazer o quê?

Macros no Access não é VBA, mas no Excel os procedimentos feitos em VBA são conhecidos como macros.

Coluna de uma tabela em Access é um campo.


O caminho mais curto para conseguir fazer muitas coisas é fazer uma de cada vez. Samuel Smiles

Share this post


Link to post
Share on other sites
gregurs

a macro é em Excel VBA o que faz é avisar a vermelho se faltar menos de dois dias e amarelo se for superior a dois dias, faz a diferença de datas, e o que preciso de fazer é para uma coluna da tabela executar a macro em todas as linhas da coluna.

D8 é a data onde me avisa

J16 é a diferença de datas

o código da macro é :

With Range("D8")

        Select Case Range("J16").Value

     

            Case Is < 0

                MsgBox ("A data do compromisso não pode ser inferior à data de alerta")

         

            Case Is <= 2

                .Interior.ColorIndex = 3

            Case Is > 2

                .Interior.ColorIndex = 27

      End Select

    End With

Share this post


Link to post
Share on other sites
Andrepereira9

vamos la a ver se eu percebi

D8 é a data onde me avisa

J16 é a diferença de datas

EX:

D8 =  11-06-2011

J16 = 13-06-2011

O D8 fica a vermelho

______________________________________________________________

D8 =  11-06-2011

J16 = 15-06-2011

O D8 fica a amarelo


A informática chegou para resolver problemas que antes não existiam

Quem ri por último é porque está conectado a 52 Kbs.

Share this post


Link to post
Share on other sites
gregurs

Não, eu não me expliquei bem tenho uma tabela com Data de compromisso e data de alerta, C8 e D8 respectivamente e tenho o J16 que faz a diferença entre C8 e D8, quando faço o Select Case Range("J16").Value é para me mostrar o D8 ficar a amarelo ou vermelho mas com base no J16 que é um numero senão não consigo, ele não compara datas com números.   

Share this post


Link to post
Share on other sites
FreiNando

Não será mais fácil usares na celula "D8" a formatação condicional inserindo 3 regras: uma para data inválida, outra para diferenças menores ou iguais a 2 dias e outra para mais de 2 dias.

Para o teu caso podes inserir regras com base no valor da celula:

  1- Valor menor que C8  - (Data Invalida) formato à escolha

  2 - Valor menor ou igual a (C8+2) - Fundo com cor '3'

  3 - Valor maior que (C8+2)  - Fundo com cor '27'


O caminho mais curto para conseguir fazer muitas coisas é fazer uma de cada vez. Samuel Smiles

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.