Página 1 de 1

Relatório de Frequência x Formulário

Enviado: 26 Mai 2020 às 14:49
por braz
Amigos,



Gostaria de preencher um relatório de frequência mensal através de um formulário tipo um cartão de ponto, tentei fazer formatando a planilha2 no formato tabela, mas não deu certo.Alguém poderia me ajudar.

Obs. No final do mês vou ter tipo 30 cartões e digitar essas informações no formulário para gerar esse relatório em ordem crescente de forma automática.



Att

Re: Relatório de Frequência x Formulário

Enviado: 26 Mai 2020 às 15:16
por Duarte
Ola! Acredito que a melhor forma seria usando uma macro, talvez com um botão.
Segue uma ideia de como elaborar a macro.
Código: Selecionar todos
    Dim form As Worksheet
    Dim rela As Worksheet
    
    Set form = Sheets("Formulario")
    Set rela = Sheets("Relatório de Frequencia Mensal")
    
    rela.Select
    Rows("4:4").Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrBelow
    
    rela.Cells(4, 1).Text = form.Cells(1, 4).Value
    rela.Cells(4, 2).Value = form.Cells(1, 6).Value
'   rela.Cells(4, 3).Value = form.Cells(N/A).Value
    rela.Cells(4, 4).Value = form.Cells(3, 3).Value
    rela.Cells(4, 5).Value = form.Cells(3, 6).Value
    rela.Cells(4, 6).Value = form.Cells(4, 3).Value
Poderia fazer outra para restaurar o formulário para o estado inicial.

Relatório de Frequência x Formulário

Enviado: 26 Mai 2020 às 18:24
por braz
Duarte,

Sua ideia parece ser ótima, mas infelizmente em função das minhas limitações não consegui por em pratica.

Att