Notifications
Clear all

Arquivo geral - Resumo

13 Posts
3 Usuários
0 Reactions
2,298 Visualizações
(@luigikaras)
Posts: 27
Eminent Member
Topic starter
 

Bom dia galera,

Não sei se o meu assunto se encaixa em macro ou uma formula resolveria o problema.
Tenho planilhas com agendamentos de uso de computadores, estilo lan house onde os dados são os seguintes:

A----------------------------------B----------------------------------C--------------------------D------------------------------E--------------------G
numero da máquina--------numero do documento-----nome do cliente-------data de nascimento -------- idade do cliente----horário da sessão

a título de informação:
São 16 máquinas;
As sessões tem duração de meia hora.

Os arquivos:
são semanais onde cada aba é um dia da semana. Ex: Arquivo 01 a 07 de janeiro - aba 01 segunda; aba 02 terça e assim por diante.
Cada arquivo esta dentro de uma pasta. Ex Semana 1, semana 2, semana 3 e semana 4 estão na pasta Janeiro. Tem a de Fevereiro e assim por diante.
Tem a pasta ano que tem 2016, 2015, 2014. Dentro da pasta tem os meses e dentro dos meses os arquivos semanais.

O que preciso:
Um arquivo que unifique tudo que tem de dados nessas pastas. Onde esse arquivo seria o geral com todos os dados dos clientes de todas as pastas (desde a mais antiga a mais nova).
Detalhe: teria que ser alguma fórmula ou vba que puxasse automaticamente os dados das planilhas ao abrir pois se conforme os dias passam, eu incluo novos dados de clientes e ele traria esses dados também no arquivo unificado.

Existe a possibilidade de algo que não precisasse fazer nenhum comando?

 
Postado : 22/04/2016 6:44 am
 RMC
(@rmc)
Posts: 54
Trusted Member
 

Boa tarde!
Ao meu ver teria ser pelo VBA do excel, pelo que li e entendi você quer que tipo abre uma nova janela (userform) com textboxs retornando os dados ou uma nova janela ao qual gerasse um gráfico ao qual exibisse os detalhes da planilha?
por exemplo:

criar uma nova UserForm (alt+f11 para abrir o visual basic no excel)
dentro desse nova janela [userform] de dois click ira abrir o seguinte código: [obs eu não renomei a UserForm]
Private Sub UserForm_Click()

End Sub

apague todo o conteúdo acima e substitua pelo abaixo:
Dim ChartNum As Integer

Private Sub grafico_Initialize()
If ChartNum = 1 Then ChartNum = 1 Else ChartNum = ChartNum + 1
UpdateChart
End Sub


Private Sub PreviousButton_Click()
    If ChartNum = 1 Then ChartNum = 1 Else ChartNum = ChartNum - 1
    UpdateChart
End Sub


Private Sub Image1_Click()

End Sub

Private Sub Label2_Click()

End Sub

Private Sub NextButton_Click()
    If ChartNum = 1 Then ChartNum = 1 Else ChartNum = ChartNum + 1
    UpdateChart
    UpdateChart2
End Sub

Private Sub CloseButton_Click()
    Unload Me
    Application.Visible = True
End Sub

Private Sub UpdateChart()
    Set CurrentChart = Sheets("Plan1").ChartObjects(ChartNum).Chart
    CurrentChart.Parent.Width = 432
    CurrentChart.Parent.Height = 240
'   Save chart as BMP
    Fname = ThisWorkbook.Path & Application.PathSeparator & "temp.bmp" 'obs se você mudar a extensão do arquivo irá gerar um outro formato da imagem a ser exibida no UserForm
    CurrentChart.Export FileName:=Fname, FilterName:="bmp" 'caso mude o temp.bmp por exemplo para .jpg você deverá mudar essa linha de código também

'   Show the chart
    Image1.Picture = LoadPicture(Fname)
End Sub

DENTRO DA USERFORM
crie dois commandbutton
um com o nome de NextButton e outro com nome de CloseButton
insera também uma figura mas não mude o nome. Deixe o nome como image1

Para testar o funcionamento clique sobre a janela principal da userform e pressiona a tecla F5

DICAS.:
ChartNum = 1 (ou seja a quantidade de gráfico na planilha seleciona no exemplo acima esta a "Plan1" fique a vontade se desejar mudar), caso tenha mais de 1 gráfico você deve mudar o valor de ChartNum para quantidade de gráficos que a planilha possuir.
obs.: caso haja mais de um gráfico na Plan1 eles serão exibidos na mesma image1 porém não simultaneamente, eles serão gerados como imagem e importados para o userform quando você clica no botão NextButton, para exibir o grafico de número 2 basta clicar novamente no botão para exibir o outro gráfico/tabela e assim por diante.

 
Postado : 24/04/2016 11:05 am
 RMC
(@rmc)
Posts: 54
Trusted Member
 

Caso queira um exemplo clique no link abaixo e baixe o arquivo.:
https://www.sendspace.com/file/sf5dlo

 
Postado : 24/04/2016 11:21 am
(@luigikaras)
Posts: 27
Eminent Member
Topic starter
 

RMC, boa noite.

na verdade eu queria não um gráfico, mas sim todos os dados que constam nas planilhas em um único arquivo.
Ex: pasta 2014 > pasta Janeiro >arquivo 01 a 07 de Jan > abas: terça/ quarta/ quinta (...)
ex 2: pasta 2014 > pasta Janeiro >arquivo 08 a 14 de Jan > abas: terça/ quarta/ quinta (...)

quero um arquivo que pegue todos os dados dos arquivos desde a pasta mais antiga (2012) a mais nova (2016) com os dados de todos clientes, geram uma planilha com os dados de todos os clientes que passou lá. Porém de maneira automática, se eu fazer Ctrl C + Ctrl V, nem nenhum comando. algo que ao abrir o próprio arquivo ele gere automaticamente todos os dados do antigo ao mais novo.

 
Postado : 24/04/2016 6:02 pm
(@mprudencio)
Posts: 2749
Famed Member
 

Disponibilize alguns arquivos e o arquivo modelo de como vc quer os resultados.

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 24/04/2016 6:46 pm
(@luigikaras)
Posts: 27
Eminent Member
Topic starter
 

Oi,

Segue um anexo de um arquivo.
Varias planilhas nesse mesmo formato.

Valeu!

 
Postado : 28/04/2016 3:02 pm
(@mprudencio)
Posts: 2749
Famed Member
 

E o arquivo de destino

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 28/04/2016 3:20 pm
(@luigikaras)
Posts: 27
Eminent Member
Topic starter
 

O arquivo para destino na realidade pode ser os dados dos clientes nesse mesmo formato mas coletando tudo que foi lançado em planilhas anteriores.
Com tudo consolidado em um único arquivo, aí crio tabelas dinâmicas ou gráficos.
Mas a princípio queria tudo lançado da antiga a mais nova no mesmo arquivo

 
Postado : 30/04/2016 8:23 pm
(@luigikaras)
Posts: 27
Eminent Member
Topic starter
 

Alguém tem alguma solução?

 
Postado : 12/05/2016 5:17 am
 RMC
(@rmc)
Posts: 54
Trusted Member
 

RMC, boa noite.

na verdade eu queria não um gráfico, mas sim todos os dados que constam nas planilhas em um único arquivo.
Ex: pasta 2014 > pasta Janeiro >arquivo 01 a 07 de Jan > abas: terça/ quarta/ quinta (...)
ex 2: pasta 2014 > pasta Janeiro >arquivo 08 a 14 de Jan > abas: terça/ quarta/ quinta (...)

quero um arquivo que pegue todos os dados dos arquivos desde a pasta mais antiga (2012) a mais nova (2016) com os dados de todos clientes, geram uma planilha com os dados de todos os clientes que passou lá. Porém de maneira automática, se eu fazer Ctrl C + Ctrl V, nem nenhum comando. algo que ao abrir o próprio arquivo ele gere automaticamente todos os dados do antigo ao mais novo.

Boa tarde!
Tipo deixa ver se eu entendi, exemplo a plan 2012 deve ser incorporada a plan 2016, porém aonde estes dados serão armazenados? tipo pode ser numa plan tipo com nome de anos exemplo e que ao pressionar o atalho da macro ou determinada tecla check se há planilha anteriores e crie um nova sheet (planilha) e adicione os dados nelas certo?
1º Sim tem como fazer sim
2º Segundo ao meu ver apenas por códigos dentro do VBA pois na planilha você não teria como fazer esse tipo de verificação.
3º Pra fazer isso acredito eu que melhor forma seria setar ou seja colocar um nome especifico do arquivo para que pudesse fazer a verificação do mesmo.
4º Melhor forma também seria que o local de procura for fixo para melhor referência-lo não sei se é seu caso

Vou tentar fazer um exemplo aqui e você vê e me diga se é mais ou menos isso você quer ok.

 
Postado : 13/05/2016 2:07 pm
(@luigikaras)
Posts: 27
Eminent Member
Topic starter
 

Ok!

Espero o arquivo

 
Postado : 14/05/2016 3:22 pm
 RMC
(@rmc)
Posts: 54
Trusted Member
 

Segue abaixo link do exemplo:
https://www.sendspace.com/file/vhimxc

Alguns parametros devem ser observados como o nome e os procedimentos são padrões então, se você modificar o nome de um dos arquivos irá dar erro (tem como fazer isso com uma variavel ou condição if para verificar estou a fazer um outro exemplo mais prático) ok, mas antes preciso que você me fale se é assim conforme o exemplo que você precisa.
Vou criar um modelo também caso seja assim totalmente em vba caso você queira ok (mas dai vou precisar um dias pra fazer blz to meio na correria rs)

Qualquer dúvida só falar.

 
Postado : 16/05/2016 1:17 pm
 RMC
(@rmc)
Posts: 54
Trusted Member
 

Segue abaixo link do exemplo:
https://www.sendspace.com/file/vhimxc

Alguns parametros devem ser observados como o nome e os procedimentos são padrões então, se você modificar o nome de um dos arquivos irá dar erro (tem como fazer isso com uma variavel ou condição if para verificar estou a fazer um outro exemplo mais prático) ok, mas antes preciso que você me fale se é assim conforme o exemplo que você precisa.
Vou criar um modelo também caso seja assim totalmente em vba caso você queira ok (mas dai vou precisar um dias pra fazer blz to meio na correria rs)

Qualquer dúvida só falar.

Como não consigo editar mas a resposta, vou postar em seguida um novo exemplo pra ti LuigiKaras!
Segue link abaixo:
https://www.sendspace.com/file/ti3vxk
Favor me resposta e diga se deu certo e/ou se preciso de mais alguns ajustes ok.
E para que eu posso criar uma planilha pra ti caso você queira totalmente ela feita em UserForm de forma a aparentar ser um programa eu faço uma pra você so me dizer do que precisa eu e nossos colegas aqui do fórum estão aqui pra te ajudar blz.

 
Postado : 23/05/2016 1:32 pm