hugonvilla

Luis Mondelo respondió: Mándame el archivo con los datos y un ejemplo manual de lo que quieres para ayudarte mejor [email protected]

Dante Amor respondió: Te preparo una macro y te la envío Saludos. Dante Amor

jrgces respondió: Por ejemplo, para la cadena situada en A1, se podría poner en B1: =IZQUIERDA(A1;19) en C1: =SUSTITUIR(EXTRAE(A1;20;16000);" ";"") en D1: =EXTRAE($C1;COLUMNA()-3;1) Y copiar y pegar esta fórmula hacia la derecha, hasta donde haga falta. La versión de...

Luis Mondelo respondió: Ahora te paso un ejemplo Un momento

Dante Amor respondió: ¿Y podría quedar el resultado en otra hoja? ¿Podemos insertar una fila al principio de todos los números para utilizarla como guía y poder resolver el problema?

Dante Amor respondió: Te envío una nueva macro. Sub cambiaxuno() 'Cambia por 1 si es el maximo, 2 al mínimo 'Por.Dam hoja = ActiveSheet.Name ucol = Cells(1, Columns.Count).End(xlToLeft).Column Worksheets.Add hojab = ActiveSheet.Name For k = 1 To ucol Sheets(hoja).Select...

Dante Amor respondió: Me puedes responder lo siguiente: Van desde la columna A, ¿hasta la HYD? ¿Hay espacio suficiente de columnas para después de la separación? ¿Qué versión de excel tienes? Con una macro, podría hacer la separación, ¿la quieres en la misma hoja o...