prucommercialre.com


Tirando Personajes Apart en una cadena larga

John tiene una hoja de cálculo que, en la columna A, tiene un gran número de cadenas de texto muy largos. Él tiene que tirar de forma individual los primeros 249 caracteres de cada cadena, la colocación de un único carácter en cada celda a la derecha de la cadena.

Hay un par de maneras que usted puede realizar esta tarea. Es bastante fácil de hacer mediante el uso de una fórmula simple. Por ejemplo, si su primera cadena de texto está en la celda A1, ponga la siguiente fórmula a su derecha, en la celda B1:

= MID ($ A1, COLUMNA () - 1,1)

Esta fórmula utiliza funciones de hoja de Excel para separar la cadena de texto. La función de columna, en este caso, devuelve el valor 2 ya que la fórmula está en la columna B y que es la segunda columna en la hoja de cálculo. Este valor se disminuye en 1, y luego se usa como un puntero a la cadena en la celda A1, marcado con la que el personaje extraído debe provenir. Al copiar esta fórmula correcta, sin embargo para muchas células deseadas, usted termina con caracteres individuales de la cadena, en orden consecutivo.

Por supuesto, si usted tiene un buen número de cadenas en la hoja de cálculo (como John lo hace), y luego copiar esta fórmula más de 249 columnas y abajo, por ejemplo, varios cientos de filas puede hacer para una hoja de trabajo muy lento. En tales situaciones, puede ser deseable utilizar una macro para dividir aparte las cuerdas en lugar de una fórmula. La siguiente macro, SplitUp, es un método para hacer el desgarro real aparte.

SplitUp Sub ()
Dim c como gama
R Dim como gama
Dim sTemp As String
Z Dim As Integer

Establecer r = Range ("A1", Range ("A65536"). End (xlUp))
For Each C en r
sTemp = Izquierda (c, 249)
Para z = 1 Para Len (sTemp)
c.Offset (0, z) = mediano (sTemp, z, 1)
Siguiente z
Siguiente
End Sub

Los macro se inicia mediante la definición de un rango (r) que consiste en todas las celdas de la columna A que contienen valores. La variable c se utiliza para representar cada celda en el rango, y los primeros 249 caracteres a extraer de cada célula. Un bucle For ... Next se utiliza para tirar de cada carácter de la cadena y esas cosas en una celda a la derecha de la cadena.

ExcelTips es su fuente de capacitación rentable Microsoft Excel. Esta punta (2790) se aplica a Microsoft Excel 97, 2000, 2002, y 2003. Usted puede encontrar una versión de este consejo para la interfaz de cinta de Excel (Excel 2007 y versiones posteriores) aquí: Tirando Aparte caracteres de una cadena larga.