Macro para copiar e colar informações externas.

Tecnologia
Brinkis  
em 17/07/19 17:20

Comentários

Último comentário 1º comentário do autor Só moderadores Só quem eu sigo Ordenar por gostei
Brutalroot  
em 17/07/2019 17:25
No excel não sei, mas se você jogar no google terão 300 explicações.

Se quiser aprender a programar esse é um bom começo, rotina fácil de fazer.
; 1; ; 1;
0 '; 0';
Macro para copiar e colar informações externas. - #1 de 18
Charlito  
em 17/07/2019 17:33
Coloca pra gravar uma macro e executa as operações, aí depois analisa no que deu a macro. Uma forma de ir aprendendo.
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #2 de 18
Ricardoch2  
em 17/07/2019 17:41
@Brinkis Vou explicando aos poucos me parece que o primeiro passo é utilizar formulas excel ao inves de copiar e colar com macros.

Quando você tem duas planilhas abertas você pode iniciar uma formula com = e selecionar dados da outra planilha.

Após fazer o "link" entre duas planilhas basta abrir as duas que os dados são atualizados

Se por acaso o nome da planilha carga for alterado podemos atualizar a formulas com editar ==: substituir todas ou renomear a planilha de carga.

Depois você pode criar uma macro para automatizar a tarefa mas é melhor carregar os dados das diversas planilhas com formulas.
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #3 de 18
Ricardoch2  
em 17/07/2019 17:58
@Charlito sim umas da melhores formulas de aprender VBA é estudando macros. Porém as macros geradas automaticamente podem ser mais complicadas que o necessário.

Uma macro gerada automaticamente para ordenar um range :(com alguns ajustes)


Sub sortmacro(tipo, Porchave)
    
   ScreenUpdating = False
   If Porchave Then
        rng1 = "G1"
    Else
        rng1 = "H1"
    End If
    ActiveWorkbook.Worksheets("Dic2").sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Dic2").sort.SortFields.Add2 key:=Range(rng1), _
        SortOn:=xlSortOnValues, Order:=tipo, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Dic2").sort
        .SetRange Range("G1:H21")
        .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
    ScreenUpdating = True
End Sub?




Um código VBA com somente o necessário: 




Sub ordenaobj(dec, Porchave)

    Dim rng1, rg1
    
    If Porchave Then
        rng1 = "G1"
    Else
        rng1 = "H1"
    End If
    
    rg1 = "G:H"
    
    Range(rg1).sort Range(rng1), dec, , , , , , xlYes
    
   
End Sub
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #4 de 18
Miro64  
em 17/07/2019 18:40
@Brinkis eu tenho uma planilha que faz exatamente isso. Mas parece que não consigo anexar aqui, né?
Me manda se e-mail em mensagem privada que eu envio para você...
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #5 de 18
Ricardoch2  
em 17/07/2019 18:51
A aba documentos aceita planilhas

@Miro64 Valeu pela contribuição !
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #6 de 18
Miro64  
em 17/07/2019 19:13
Salvei a planilha na aba documentos. 
Agora vc precisa entender um pouco do código para fazer as alterações necessárias.

Vou colar o link abaixo. Não sei se funciona direto...
https://bastter.com/Mercado/Arquivos/Grupos/documento/0163e97a-5388-421e-8d4f-209ecce05233.xls
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #7 de 18
Ricardoch2  
em 17/07/2019 19:24
O LInk está funcionando !
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #8 de 18
Charlito  
em 17/07/2019 19:48
@Ricardoch2 Sim, gravar é só o começo, pq vem muita "sujeira". Bom pra ir se acostumando com a sintaxe.
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #9 de 18
Ricardoch2  
em 17/07/2019 19:53
@Charlito só cheguei na simples após estudar muito a complexa , Esse caminho de estudar macros é soberano
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #10 de 18
extimido  
em 17/07/2019 19:56
qual o programa utilizado para criar macros?
eu comecei a fazer de forma muito amadora utilizando um sistema da receita federal chamado HOD. lá ele permite criar macros..foi bem iniciante mas já fez uma diferença
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #11 de 18
Ricardoch2  
em 17/07/2019 19:59
@extimido as macros podem ser criadas em todo Microsoft Office mas o ideal é começar pelo Excel.

Para isso temos que no excel selecionar Arquivo==>Opções ==> Personalizar Faixa de opões e na direita ativar o menu desenvolvedor .

No menu desenvolvedor temos ambiente para gravar e editar macros.

Para usar Macros tem que em Opções selecionar Central de Confiabilidade e configurar a segurança de Macros.
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #12 de 18
Brinkis  
em 17/07/2019 22:46
@Ricardoch2 muito obrigado pelas informações, fico na dúvida se seguir esse caminho seria o mais fácil. Eu não quis aprofundar o problema, porque achei que o tópico ia ficar muito extenso. A questão é que preciso estruturar uma base uma única vez. Para fazer isso, precisaria abrir, literalmente, 157 planilhas e fazer o processo que você me falou. 

@Charlito tenho feito exatamente isso para tentar aprender VBA, mas nesse caso específico a macro não gravou a referência externa, não sei se foi burrice minha ou realmente tem limitações nesse caso.

Pessoal agradeço pelas dicas.

@Miro64 vou tentar usar e te dou um retorno, se funcionar podia rolar até um FAQ.

; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #13 de 18
normaul  
em 18/07/2019 04:55
@Ricardoch2 uma dúvida de quem não mexe com vba a 10 anos:

se eu tenho planilhas mais completas do excel já montadas, eu consigo abrir o código dela no vba para estudar o que eu estava fazendo nas células do excel?
ou seja, o excel permite que eu veja o código de vba de uma planilha já implementada ?
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #14 de 18
Ricardoch2  
em 18/07/2019 07:05
@normaul Vai depender se essas macro foram gravadas com senhas. se não foram podemos acessar a mesma em editar macro ou VBA do menu desenvolvedor.
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #15 de 18
Ricardoch2  
em 18/07/2019 07:08
@Brinkis Com certeza no seu caso o ideal era carregar as planilhas para Microsoft Access e depois consolidar os dados com consultas SQL

Seja qual for o caminho que vc decida poste aqui que vamos tentando ajudar.

O Access é mais apropriado que Excel para lidar com enormes massas de dados.
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #16 de 18
Brinkis  
em 18/07/2019 18:14
Infelizmente não tem access aqui na empresa =/

@Miro64 cara deu boa, só tive que mudar a aba que ele ia buscar as infos, de resto deu certinho.

Muito obrigado a todos.
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #17 de 18
Ricardoch2  
em 18/07/2019 19:19
Grande @Miro64 valeu pela força !
@Brinkis   o importante é resolver o problema !
; 1; ; 0;
0 '; 0';
Macro para copiar e colar informações externas. - #18 de 18

7 usuários comentaram este tópico.
Clique para ir para o primeiro comentário do usuário.

Ações Pesquisa Videos Livros Análise de Carteira Desconto FAQs Orientação Esportiva Ofertas e Serviços Bastter System Boletim IR Podcasts Revista Tecnologia - Ajuda Eu Assinar Ações Pesquisa Videos Livros Análise de Carteira Desconto FAQs Ofertas e Serviços Orientação Esportiva Boletim BS Podcasts IR Tecnologia Ajuda eu Revista Assinar Assinar

BastterZap