Página 1 de 1
Planilha controle de ponto
Enviado: 25 Ago 2015 às 07:49
por Suenne
Caros, bom dia!
gostaria da ajuda de vocês para criar uma planilha para controle de ponto.
Meu objetivo final é filtrar todo final de período, os colaboradores que fizeram horas extras.
Meu intervalo para fechamento de ponto compreende sempre do dia 16 ao dia 15 do mês seguinte.
Alguém pode me ajudar?
Segue em anexo planilha com a jornada de trabalho.
Obrigada.
Planilha controle de ponto
Enviado: 25 Ago 2015 às 10:12
por Pernilongo
bom dia suenne,
diga-nos alguns detalhes, quantas horas por dia é "normal" aí na sua empresa? sabado é domingo é considerado hora extra? a partir de que horas ? voce já conseguiu calcular a quantidade de horas ?
a partir de quantas horas por mês é considerado hora extra?
pra vc comecar a entender veja que na sua linha da segunda coloque essa fórmula na f4 =(E4-D4)+(C4-B4)
vc terá a qtde de horas daquele dia...
enfim, dê mais detalhes do seu problema pra gente tentar te ajudar
Re: Planilha controle de ponto
Enviado: 25 Ago 2015 às 10:51
por Suenne
Olá Pernilongo!
primeiramente obrigada, então, sobre calcular as horas extras, é tranquilo.
Minha dificuldade está em facilitar a inserção dos dados por colaborador, e no final do mês conseguir realizar filtros, por exemplo:
Todos os colaboradores que fizeram horas extras no dia 25/08/2015.
Eu dividia isso em abas, mas não está facilitando na hora de digitar os dados.
Segue em anexo o que fiz até agora.
Re: Planilha controle de ponto
Enviado: 25 Ago 2015 às 13:22
por alexandrevba
Boa tarde!!
Porque não postou seu modelo, contendo o antes e depois do que deseja, tem pessoas como eu que não entende de como funciona o ponto, mas consegue a partir de determinado dado transfoma-lo em informação.
Quanto os outros não responde, se quiser alterar seu modelo ou explicar melhor...fique a vontade.
Att
Re: Planilha controle de ponto
Enviado: 25 Ago 2015 às 14:17
por wagnersoares
Boa tarde Pessoal
Por favor, se deu certo esta planilha de ponto, alguém poderia disponibiliza-la para mim??
Agradeço
Planilha controle de ponto
Enviado: 26 Ago 2015 às 08:14
por Suenne
Bom dia,
postei a planilha no meu comentário anterior.
Conseguiram visualizar?
Obrigada.
Re: Planilha controle de ponto
Enviado: 26 Ago 2015 às 13:54
por Suenne
Caros, boa tarde!
fiz um upgrade na planilha, mas ainda não consegui chegar no resultado esperado.
Coloquei uma seleção do colaborador, eu preciso que sempre que o colaborador for alterado, ele carregue um formulário em branco e depois de preenchido eu tenha a opção de enviar para base geral, onde usarei para gerar os relatórios.
Alguém pode me ajudar?
Obrigada,
Re: Planilha controle de ponto
Enviado: 27 Ago 2015 às 11:20
por alexandrevba
Bom dia!!
O que é formulário pra vc seria a guia
Ponto, então quando a célula D7, for alterado por outro Colaborador, então os campos referentes as colunas ( Entrada - Saída | Entrada - Saída | Carga horária / Dia) devem ser limpos, se puder ser claro, talvez sua ajuda será mais rápida e eficiente.
Se for isso, use a linha...
Att
Re: Planilha controle de ponto
Enviado: 27 Ago 2015 às 11:54
por Suenne
Bom dia Alexandre,
vou detalhar o que preciso.
Referente a limpeza das células, eu consegui fazer, meu problema agora é incluir esses dados em uma outra aba que será meu "banco de dados". Sempre que a pessoa registar o ponto do funcionário, ele armazena esses dados em outra aba.
Assim que eu levar os dados de entrada e saída, eu preciso também levar o período e o nome do colaborador.
Como o período e nome do colaborador é digitado apenas no cabeçalho, eu preciso encontrar uma forma de repetir essas informações para acompanhar os dados que estão por dia na planilha Base Geral.
Eu já consigo copiar os dados de entrada e saída, preciso da solução pro período e nome.
Consegui clarear?
Obrigada,
Re: Planilha controle de ponto
Enviado: 27 Ago 2015 às 14:17
por alexandrevba
Boa tarde!!
Código: Selecionar todosSub AleVBA_485()
'Seria mais ou menos isso ???
Worksheets("Gambiarra").Rows("2:1000").EntireRow.Delete
Worksheets("Ponto").Range("C13:K43").Copy
With Sheets("Gambiarra").Range("A1").End(xlUp).Offset(1)
.PasteSpecial xlPasteFormats
.PasteSpecial xlPasteValues
End With
Worksheets("Ponto").Range("D5").Copy Range("J2:J43")
Worksheets("Ponto").Range("D7").Copy Range("K2:K43")
Worksheets("Ponto").Range("D9").Copy Range("L2:L43")
End Sub
Att
Planilha controle de ponto
Enviado: 27 Ago 2015 às 14:44
por Suenne
É isto mesmo que estou precisando, só que a função de colar na próxima linha em branco não funcionou.
O que pode ser?
Re: Planilha controle de ponto
Enviado: 27 Ago 2015 às 16:16
por alexandrevba
Boa tarde!!
Então tente assim, mas isso é só uma forma tosca, ainda temos que ver uma forma de apurar as linhas com dados remanejar para sua real base de dados.
Código: Selecionar todosOption Explicit
Sub AleVBA_485()
Worksheets("Gambiarra").Rows("2:1000").EntireRow.Delete
Worksheets("Ponto").Range("C13:K43").Copy
With Worksheets("Gambiarra").Range("A1").End(xlUp).Offset(1)
.PasteSpecial xlPasteFormats
.PasteSpecial xlPasteValues
End With
With Worksheets("Gambiarra")
.Range("J2:J43") = Worksheets("Ponto").Range("D5")
.Range("K2:K43") = Worksheets("Ponto").Range("D7")
.Range("L2:L43") = Worksheets("Ponto").Range("D9")
End With
End Sub
Att
Planilha controle de ponto
Enviado: 27 Ago 2015 às 16:29
por Suenne
Alexandre, acho que estamos quase lá.
A função abaixo é a responsável por validar qual a última linha que tem dados na plan Gambiarra, certo?
With Worksheets("Gambiarra").Range("A1").End(xlUp).Offset(1)
Se for isto, ela não cola o dado na próxima linha, está sempre substituindo

Re: Planilha controle de ponto
Enviado: 28 Ago 2015 às 10:10
por alexandrevba
Bom dia!!
Foi posto propositalmente, por isso eu chamei de gambiarra.
Minha ideia seria entender melhor, e só depois copiar da guia gambiarra para a guia que vc deu nome de Banco de dados.
Eu preciso entender sua dúvida melhor.
Por exemplo: Se você tem as linhas em branco (dia 08-09/08/2015), corre o risco de ter dados depois..?
(dia 10-11/08/2015).
Data----------Entrada-Saida-Entrada-Saida-
05/08/2015-08:00-----12:00-13:00-----17:48
06/08/2015-08:00-----12:00-13:00-----17:48
07/08/2015-08:00-----12:00-13:00-----17:48
08/08/2015-08:00-----
09/08/2015-08:00-----
10/08/2015-08:00-----12:00-13:00-----17:48
11/08/2015-08:00-----12:00-13:00-----17:48
A ideia seria pegar somente os dados (linhas com Data - HrEntrada - HrSaida), depois de separa-los e jogar na guia realmente desejada...
Att