Excel: pegue a mesma coluna de toda planilha e adicione a nova planilha

Question

Eu tenho uma pasta de trabalho do Excel com 500 planilhas. Um exemplo de planilha é mostrado na imagem abaixo. Estou interessado apenas nos dados da coluna E de cada uma dessas 500 folhas.

Existe uma maneira fácil de usar a coluna E de todas as planilhas e colocá-las em uma nova planilha?

Eu não quero fazer cálculos neles, basta exibir todas as 500 colunas Es em uma nova planilha.

Eu estive pesquisando e não consigo encontrar uma solução.

Formato das planilhas:

    

Answer 1

Isso pode ser feito de forma relativamente fácil usando o VBA.

• Abra o IDE do Visual Basic usando Alt + F11
• Insira um novo módulo público usando Alt + eu , M

• Cole o seguinte código no módulo:

  Sub GrabColumnE()
      Dim shtCoE As Worksheet
      Dim shtSrc As Worksheet
      Dim lngCol As Long: lngCol = 1
  
      Set shtCoE = Sheets.Add(After:=Sheets(Sheets.Count))
      For Each shtSrc In Sheets
          If Not shtSrc Is shtCoE Then
              shtSrc.Columns(5).Copy shtCoE.Columns(lngCol)
              lngCol = 1 + lngCol
          End If
      Next shtSrc
  End Sub
  

• Pressione F5 com o cursor dentro do código para executar o Sub, ou vá para a guia Developer na faixa de opções, clique em Macros , selecione a macro com o acima do nome e clique em Run .

Espero que isso ajude.