Insira a data no Excel

Question

Estou inserindo toneladas de datas no Excel - todas para o mesmo mês e ano em dias diferentes. É possível inserir "20" em uma célula e preenchê-la como "12/20/2013"?

    

Answer 1

Digite o número em uma coluna (por exemplo, A) e, na próxima coluna, use DATE :

=DATE(2013,12,A1)

Preencha para trabalhar com outras linhas.

    

Answer 2

Você também pode usar uma macro VBA para fazer isso, assim:

1. Abra o editor VBA pressionando Alt + F11 .
2. Selecione no menu Inserir > Módulo .

3. Escreva abaixo o código:

   Sub dateMe()
       On Error GoTo NotPossible
       If CInt(ActiveCell.Value) > 0 And CInt(ActiveCell.Value) < 32 Then
           ActiveCell.Value = CDate("2013-12-" + CInt(ActiveCell.Value))
       End If
   NotPossible:
   End Sub
   

4. Agora você pode abrir a janela Macro selecionando Visualizar > Macros > Visualize Macros no menu e, quando dateMe for selecionado, pressione [opções ...] e selecione uma tecla para a sua tecla de atalho.

   Note: short-cut key or running a macro over your selected cell will run after exiting from Edit Mode or While Wrinting Inside Cell.