Função VBA Hoje
Hoje significa a data atual, na planilha a função Agora faz a mesma coisa que nos dá a data e hora atuais, mas não há nenhuma função de hoje embutida no próprio VBA, o método para obter a data atual do sistema é usando a função de data e ao contrário da função now, a função date apenas nos dá a data atual.
No excel temos várias funções úteis que podem nos ajudar no dia a dia. O Excel facilitou toda a nossa vida no local de trabalho. Quando digo “diário”, o excel tem a fórmula para retornar a data de hoje também, não apenas a data, também podemos obter a data e a hora atuais juntas. Essa é a variedade de fórmulas do Excel. Se você é um usuário regular do excel, espero que tenha encontrado a fórmula chamada “HOJE” no excel para inserir a data atual conforme mostrado em seu computador de trabalho. Mas não temos a função HOJE no VBA, então como obtemos a data HOJE do VBA. Este artigo mostrará como trabalhar com a data HOJE no VBA. Leia.
Qual é a fórmula para obter a data de hoje no VBA?
Se não houver uma fórmula chamada TODAY, como obtemos a data de hoje do VBA? Esta é a pergunta comum que todos fazem, mas a solução é simples, temos uma fórmula com um nome diferente, ou seja, função DATE.
Qual é a função de data no VBA?
DATE é exatamente igual à função VBA TODAY, mas não é uma função volátil, a menos que você execute a macro ou acione a macro.
A sintaxe da função DATE não tem nenhum argumento que precisamos apenas para passar a função DATE e pronto.
ENCONTRO ()
Exemplos de função de data em VBA
Função DATE para retornar a data atual do sistema. Isso é muito útil quando o usamos como parte de um grande projeto VBA. Para ter um bom conhecimento sobre isso, primeiro vou mostrar exemplos simples da função DATE.
Exemplo 1
Vamos criar uma função DATE simples para mostrar a data atual na caixa de mensagem. Siga as etapas abaixo para escrever a macro do Excel.
Etapa 1: crie um subprocedimento nomeando a macro.
Passo 2: Declare a variável como “Data”. A função DATE retorna o resultado apenas como data, então o tipo de dados da variável deve ser “Data”.
Código:
Sub Today_Example1 () Dim K As String End Sub
Passo 3: Atribua o valor à variável “k” como função DATE .
Código:
Sub Today_Example1 () Dim K As String K = Date End Sub
Passo 4: Agora o valor da variável “k” na caixa de mensagem em VBA .
Código:
Sub Today_Example1 () Dim K As String K = Data MagBox K End Sub
Execute o código que devemos ver a data atual conforme mostrado no sistema.
Nota: O formato da data pode variar com base nas configurações do sistema. Pode ser em “mm-dd-aa”, “dd-mm-aa”.
A função de data para encontrar o vencimento é hoje
A função de data é mais útil no contexto de encontrar as datas de vencimento de EMI, pagamento com cartão de crédito, pagamentos de seguros, etc ...
Suponha que você esteja trabalhando como um oficial de recuperação de empréstimos e tenha uma lista de clientes com o valor devido e a data de vencimento.
Na coluna de status, você precisa do resultado “O prazo é hoje” se a data de vencimento for igual à data atual do sistema.
Isso pode ser feito usando a condição IF e os loops no VBA. Abaixo está o código pronto para você chegar aos resultados.
Código:
Sub Today_Example2 () Dim K As Integer For K = 2 To 11 If Cells (K, 3) .Value = Date Then Cells (K, 4). = "Hoje não" End If Next K End Sub
Isso chegará aos resultados na coluna de status.
Assim, em muitos cenários, podemos usar a função DATE para verificar as datas e realizar algum tipo de ação.
Você pode baixar esta Função VBA Hoje aqui. Modelo de Excel da função VBA Hoje
