none
Selecionar a partir da segunda linha no intervalo de células utilizadas? RRS feed

  • Pergunta


  • Preciso de um código que selecione as células de utilizadas na planilha, exceto a primeira linha deste intervalo, onde quer que ele esteja na planilha.


    Anderson Diniz


    domingo, 22 de janeiro de 2017 16:16

Respostas

  • Sub NaoSelecionarPrimeiraLinha()
        Dim S As Range
        
            Dim I As Range
        Dim U As Range
        Dim P As Range
        
        Set I = Sheets("Planilha2").UsedRange
       
        
        Set P = I.Cells(1, 1)
        P.End(xlDown).Select
        Selection.End(xlToRight).Select
     
       
        
        Sheets("Planilha2").Range(Selection, I.Cells(2, 1)).Select
        
    End Sub


    Anderson Diniz

    • Marcado como Resposta AndersonFDiniz2 domingo, 22 de janeiro de 2017 17:17
    • Não Marcado como Resposta AndersonFDiniz2 sábado, 23 de setembro de 2017 02:05
    • Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 19:49
    • Não Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 19:56
    • Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 19:57
    • Não Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 20:00
    • Marcado como Resposta AndersonFDiniz2 quarta-feira, 22 de novembro de 2017 02:36
    domingo, 22 de janeiro de 2017 17:17

Todas as Respostas

  • Sub NaoSelecionarPrimeiraLinha()
        Dim S As Range
        
            Dim I As Range
        Dim U As Range
        Dim P As Range
        
        Set I = Sheets("Planilha2").UsedRange
       
        
        Set P = I.Cells(1, 1)
        P.End(xlDown).Select
        Selection.End(xlToRight).Select
     
       
        
        Sheets("Planilha2").Range(Selection, I.Cells(2, 1)).Select
        
    End Sub


    Anderson Diniz

    • Marcado como Resposta AndersonFDiniz2 domingo, 22 de janeiro de 2017 17:17
    • Não Marcado como Resposta AndersonFDiniz2 sábado, 23 de setembro de 2017 02:05
    • Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 19:49
    • Não Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 19:56
    • Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 19:57
    • Não Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 20:00
    • Marcado como Resposta AndersonFDiniz2 quarta-feira, 22 de novembro de 2017 02:36
    domingo, 22 de janeiro de 2017 17:17
  • Ótima rotina!
    Funcionou perfeitamente.

    Interessante executa também a partir da planilha ativa, independente do subscrito do intervalo,assim evita este tipo de problema.

    • Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 19:52
    • Não Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 19:52
    • Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 20:00
    sexta-feira, 22 de setembro de 2017 14:10
  • Anderson, conseguiu verificar  a sugestão conforme mensagem anterior?
    • Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 20:00
    • Não Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 20:00
    • Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 20:00
    sábado, 23 de setembro de 2017 00:48
  • RESOLVIDO ANDERSON.

    MAS DE QUALQUER FORMA MARCAREI COMO RESPOSTA.
    • Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 20:00
    • Não Sugerido como Resposta CS_RODRIGO terça-feira, 21 de novembro de 2017 20:00
    terça-feira, 21 de novembro de 2017 19:49