Guru do Excel e Power BI

Usando VBA no excel, preciso abrir uma série de arquivos MSG (do Outlook) e salvar os anexos que estão na mensagem.
O problema que estou encontrando é que as mensagens não estão no Outlook e sim um uma pasta. Todos os posts que olhei é como capturar os anexos em mensagens que já estão no outlook. Alguem sabe ou tem algum codigo como fazer isso ?

Veja se ajuda.

Não funcionou. Nesse artigo, as mensagens estão no Outlook, numa caixa de entrada ou PST.
O que eu preciso, as mensagens estão em uma pasta/diretorio do windows.
O pessoal "arrastou" mais de 5000 mensagens para uma pasta windows. As mensagens tem extensão msg.
Preciso salvar os anexos que estão nessas mensagens.
Obrigada
Bel