Outro Macro para consolidar múltiplos arquivos em um arquivo unico

[RAFAEL SILVA SOUZA]

Boa tarde, estou começando a criar códigos em VBA no Excel, e gostaria de utilizar uma macro que permite o usuário selecionar múltiplos arquivos em um determinado local da rede interna da empresa (73 arquivos no total de 73 clientes diferentes). Todos os 73 arquivos possuem 6 abas padronizadas com o mesmo nome e o mesmo layout.

Cada aba possuem informações diferentes, eu precisaria consolidar todos esses 73 arquivos e as abas em um arquivo único com somente as informações da 2º,3º,4º e 5º  aba.

(OBS: A 1º e a 6º aba são somente  informações para os clientes tirarem duvidas , não sendo necessário levar essas informações para a planilha consolidada).

 

Tentei utilizar o código abaixo porém não sei como continuar:

 

< Dim FDLG As FileDialog
Dim Arquivo As String

Set FDLG = Application.FileDialog(FileDialogType:=msoFileDialogOpen)

With FDLG
.AllowMultiSelect = True
.InitialView = msoFileDialogViewDetails
End With

If FDLG.Show = -1 Then
Arquivo = FDLG.SelectedItems(1)
End If >

 

Segue imagem dos nomes das abas dos arquivos padronizados:

 

OBRIGADO