Índice

Solución 11.7 Eliminar todos los espacios inútiles y redundantes de un rango de celdas que contenga texto

Sub EliminarEspacios()  
  Dim rngCelda As Range  
  For Each ...