Você pode fazer isso com uma fórmula Index/Mid e criar um intervalo nomeado.
Passo 1 - Crie um intervalo com nome, chame-o de SheetNames e "Refere-se a" =GET.WORKBOOK(1)&T(NOW())
Passo2-Coloqueissonacélulaondevocêdesejacomeçarlistandoosnomesdaplanilhaearrasteparabaixo:
=INDEX(MID(SheetNames,FIND("]",SheetNames)+1,255),ROWS(A$1:A1))
Issopressupõequesuapastadetrabalhofoisalva.
E,claro,vocêpodeincluirissoemIFERROR([formula],"") para ocultar qualquer erro #REF .
(Encontrei isso graças a MrExcel.com )

