Luis Mondelo respondió:
Te mando mi solución: Primero marca con el ratón el rango que quieras convertir a texto y después ejecuta esta macro: Sub prueba() 'por luismondelo For Each celda In Selection celda.Value = "'" & celda.Value Next End Sub recuerda finalizar