Macro para consolidar valor de celda de varios archivos excel en una carpeta

Necesito hacer una macro que realice un listado con el valor de la celda B2 de una hoja oculta y protegida con clave llamada Hoja SAP varios archivos excel que están en un carpeta que se debe seleccionar