none
Copiar dados de outra planilha RRS feed

  • Pergunta

  • olá a todos

    estou com um probleminha bobo mas chato no meu código

    estou usando uma planilha para gerenciar as vendas e as entregas dos vendedores, a planilha que gerencia os dados e importa usa listas para escolher qual planilha e qual data vai copiar as entregas. até ai tudo bem, o que tá pegando é quando eu seleciono os dados na planilha de origem estou usando o seguinte código

    wsOrigem.Range("B16:G300").Copy

    wsOrigem é a variável definida como workbook com a arquivo de destino dos dados e tal...

    o que tá acontecendo é que a planilha pode ter ou não 300 vendas em um dia por isso preciso selecionar apenas o inervalo que contenha dados para isso o código:

    Range("B16", Range("G1048576").End(xlUp)).Copy

    mas só funciona na planilha ativa, mesmo eu usando:

    wsOrigem.Range("B16", Range("G1048576").End(xlUp)).Copy

    não funciona, retorna o erro: O Método Range do objeto "_Worksheet" falhou

    gostaria de ajuda para copiar apenas o intervalo de dados que contenha valores da planilha de destino lembrando que os dados nem sempre são contíguos.

    sexta-feira, 4 de novembro de 2016 11:05

Todas as Respostas

  • wsOrigem.Range("B16", wsOrigem.Range("G1048576").End(xlUp)).Copy
    
    
    'ou:
    
    With wsOrigem
        .Range("B16", .Range("G1048576").End(xlUp)).Copy
    End With
    


    http://www.ambienteoffice.com.br - http://www.clarian.com.br

    sexta-feira, 4 de novembro de 2016 19:06
    Moderador