Función o macros para crear una coma por cada letra mayúscula

Quiero saber si hay algún macros o función para crear una coma y espacio por cada letra mayúscula el formato es el siguiente:

Bar Recepción abierta las 24h Todas las zonas comunes y privadas son para no fumadores Zona de fumadores Fax / fotocopias Consigna Terraza Conexión Wi-Fi a red local Mostrador de información turística Alquiler de coches Servicio de planta Cuarto de baño Cuarto de baño compartido.

Como se ve el patrón son las mayúsculas la idea es crear una coma y un espacio antes de cada letra mayúscula y a ser posible eliminar el espacio antes de la coma y que la coma no aparezca en la primera letra mayúscula de forma que quede así:

Bar, Recepción abierta las 24h, Todas las zonas comunes y privadas son para no fumadores, Zona de fumadores, Fax / fotocopias, Consigna, Terraza, Conexión Wi-Fi a red local, Mostrador de información turística, Alquiler de coches, Servicio de planta, Cuarto de baño, Cuarto de baño compartido.