Como selecionar automaticamente um intervalo não consecutivo de linhas / colunas

Question

Eu tenho um documento do Excel no qual eu quero selecionar algumas centenas de linhas (não necessariamente consecutivas), para depois copiá-las para outro documento (que servirá como documento de origem para um documento de etiqueta de endereço do Word).

Eu tenho tudo planejado sobre como fazer isso, exceto pela primeira parte: selecionar as linhas apropriadas.

Existe algum diálogo em algum lugar no qual eu possa inserir uma string como "1-5, 7, 9-13, 24-28, 33", após o que as linhas indicadas são selecionadas? Ou eu tenho que usar algum tipo de macro?

EDIT: Note que o que eu estou depois é uma seleção regular. Eu quero "automatizar" o árduo processo de clicar em CTRL coluna após coluna para obter a seleção desejada.

    

Answer 1

Isso deve ser feito para você, assumindo que (no código abaixo) A1 é onde você colocará os dados.

Por favor, note que ele aceita números como linhas, strings como colunas

Option Explicit
Sub HighlightAllSortsOfMadness()

Dim values() As String

values = Split(Range("A1").Value, ",") 'A1 is rows and columns you specify, such as 1,4,6,7,B,D . Separate each with a comma, 


Dim result As String

Dim i As Integer

    For i = 0 To UBound(values)
        If values(i) = "" Then
            Exit For
        End If

    result = result & values(i) & ":" & values(i) & ","

    Next i

    Range(Left(result, Len(result) - 1)).Select

End Sub

Antes

Edepoisdeexecutaramacro

    

Answer 2

Se você conhece as letras / números, pode selecioná-los com uma fórmula simples: = B: B; D: D; G: G; I: I; K: K; N: P;

B: B selecionará a coluna inteira. N: P selecionará colunas inteiras de N a P, incluídas.