Como excluir múltiplas colunas não adjacentes no Excel ao mesmo tempo?

Question

Quando eu seleciono várias colunas (não adjacentes) e tento excluí-las em um movimento, o Excel torna as opções para excluir colunas. As opções de exclusão de coluna estão disponíveis somente quando eu seleciono colunas adjacentes. Por que esse é o caso e existe uma maneira de excluir várias colunas não adjacentes ao mesmo tempo?

    

Answer 1

Infelizmente, o Micro $ soft decidiu que colunas não contíguas, com pelo menos uma delas cruzando uma tabela, não podem ser excluídas simultaneamente. Quanto ao porquê, você terá que perguntar a eles . (Talvez porque seja "muito difícil", pois as tabelas eram um recurso adicionado tardiamente).

Você pode excluir várias colunas não contíguas ao mesmo tempo.

Se é algo que você deseja fazer regularmente com o Tables, é possível escrever algum VBA e mapeá-lo para um atalho de teclado (mesmo para a tecla Del ) ou adicioná-lo à fita, para o fazer. O código passaria pelas colunas e as excluiria uma a uma.

    

Answer 2

Como você criou Tabela do Excel , acredito que não seja possível. Você precisa excluir colunas não adjacentes, uma a uma.

(referência)

    

Answer 3

Eu gostaria de sugerir-lhe macro simples, para excluir várias colunas não adjacentes em um traço.

Public Sub DeleteColumns()
    Dim i As Long, arr As Variant

    arr = Split("2-4-6", "-") 

    Application.ScreenUpdating = False

    With Sheet1
        For i = UBound(arr) + 1 To LBound(arr) + 1 Step -1
            .Cells(Val(arr(i - 1))).EntireColumn.Delete
        Next
    End With
    Application.ScreenUpdating = True
End Sub

N.B.

• Você pode substituir valores na divisão ("2-4-6" ,) com a coluna obrigatória números como Split ("1-3-5").
• A ordem da coluna deve ser crescente .
• Com Sheet1 , também é editável.