Ciaran trabaja en una biblioteca y, a menudo, tiene que trabajar con largas listas de números ISBN en Excel. Los números deben contener 10 o 13 dígitos, pueden contener guiones y pueden tener ceros a la izquierda. Utiliza formato de texto para las celdas que contienen ISBN para mantenerlas intactas como cadenas de texto. Para algunos propósitos, los guiones en los ISBN deben eliminarse (usa Buscar y reemplazar para esto) y ahí es donde comienza el problema.

0-241-95011-2 se convierte en 241950112 (ahora se reduce a 9 dígitos) y, peor aún, 978-0-00-200784-9 se convierte en 9.78E + 12 (notación científica). Ciaran no puede encontrar ninguna forma de solucionar estos dos problemas, sin importar lo que haga con el formato antes o después de usar Buscar y reemplazar para deshacerse de los guiones.

Lo que está sucediendo es que cuando edita las celdas, Excel analiza el contenido de la celda como números en lugar de texto. En este caso, la mejor solución es asegurarse de que el contenido de su celda esté precedido por un apóstrofo antes de hacer Buscar y reemplazar para deshacerse de los guiones.

Si tiene una hoja de trabajo que contiene muchos números ISBN en la columna A, puede agregar los apóstrofos con una fórmula como la siguiente:

= "'" & A1

Luego puede copiar los resultados de las fórmulas y luego usar Pegado especial para pegar valores nuevamente en la columna A. Cada valor en la columna A incluirá el apóstrofo. Cuando más tarde realice Buscar y reemplazar, los ceros iniciales seguirán presentes y no obtendrá ningún intento de notación científica.

La razón por la que esto funciona es porque el apóstrofe es un indicador para Excel de que el contenido de la celda debe tratarse como texto. El apóstrofe no se muestra en la hoja de trabajo, pero es parte del contenido de la celda, como puede ver al mirar la barra de fórmulas.

Otro enfoque es omitir el uso de Buscar y reemplazar para deshacerse de los guiones. En su lugar, use la función SUSTITUIR para eliminarlos, de esta manera:

=SUBSTITUTE(A1,"-","")

La función de hoja de cálculo SUSTITUIR devuelve un valor de texto, por lo que los ceros iniciales se mantienen y Excel no intenta convertir los números para usar un formato numérico.

Si normalmente necesita eliminar los guiones de un rango de celdas que contienen ISBN, es mejor que utilice una macro para realizar la operación. La siguiente macro funciona en cualquier celda que haya seleccionado antes de ejecutarla.

Sub RemoveDashes()

Dim c As Variant, sISBN As String

For Each c In Selection         sISBN = Application.Substitute(c, "-", "")

c.NumberFormat = "@"

c.Value = "'" & sISBN     Next End Sub

Básicamente, la macro hace tres cosas: elimina los guiones, formatea la celda como texto y coloca el ISBN eliminado en la celda con un apóstrofo antes.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.

link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (9927) se aplica a Microsoft Excel 97, 2000, 2002 y 2003. Puede encontrar una versión de este consejo para la interfaz de cinta de Excel (Excel 2007 y posterior) aquí:

link: / excelribbon-Removing_Dashes_from_ISBN_Numbers [Eliminando guiones de los números ISBN].