Favor ayuda para completar una macro

Expertos tengo una macro para enviar correos, pero quisiera adjuntarle todos los archivos alojados en la carpeta CONTROL , no se si se pueda ocupar esta instrucción para ello.-

attachments.Add ("D\control\(*/*).xls)