Freddy Ch

En una celda tengo el siguiente texto: ---Celda A1: Frank Harbey Sanabria Florez DG 3 N 8302 TO 2 AP 1104 Bogota cundinamarca Colombia --- Quiero separarlos en columas, es decir: Celda A2: Frank Harbey Sanabria Florez Celda A3: DG 3 N 8302 TO 2 AP...

Tengo la siguiente información: CeldaA: 20545201071 GEO-RETAIL PERU S.A.C. CeldaB: 20545201071 Quiero que en la celda C se muestre el siguiente resultado: CeldaC: GEO-RETAIL PERU S.A.C. Qué fórmula podría utilizar para realizar esa operación.

Es posible a través de una macro copiar un rango y pegarlo varias veces. Por ejemplo, en la Hoja1 tengo un rango (A1:A3) A 1 1/3/2015 2 2/3/2015 3 3/3/2015 Necesito Copiarlo y pegarlo en la Hoja2, 3 veces: A 1 1/3/2015 2 2/3/2015 3 3/3/2015 4...

Tengo la siguiente macro: __________________ Sub Paste() Dim nFilaFin As Double Worksheets("Hoja5").Select nFilaFin = Range("B" & Rows.Count).End(xlUp).Row Range("b2:b32").Select Selection.Copy Range("b" & nFilaFin + 1).Select ActiveSheet.Paste End...

En una pregunta anterior, ya habías dado el siguiente código: Sub Macro1() 'Por.DAM Range("A1:A20").Copy Range("B5").PasteSpecial Paste:=xlPasteValues, _ Operation:=xlNone, SkipBlanks:=False, Transpose:=True End Sub Es posible que, cuando pega los...

Tengo una lista como la siguiente: Quiero ordenarla de la siguiente manera automáticamente: ¿Cómo podría lograr ordenarlo de esa manera?

Tengo la tabla. Esta contiene más información, para el ejemplo cito: Necesito una macro para que en la hoja2 en la Columna A aparezcan las fechas, en la columna B Aparezca el nombre (este debe repetirse tantas veces como fechas hallan) en la columna...

Estoy utilizando la formula "Si" y "Encontrar": =SI(ENCONTRAR(2012, B5, 1), 2012, SI(ENCONTRAR(2010, B5, 1), 2010,"NA")) Esta formula me funciona para el valor verdadero, pero en el valor falso me arroja #¡Valor!

Me podrían ayudar con una macro que permita extraer 4 números seguidos. Por ejemplo en la celda A1 tengo lo siguiente: 003 2012-02-02 21-35-28.JPG; de ahí tendría que extraer 2012.

Tengo este código: Sub Clear() buscardato = InputBox("Deme el dato") Sheets("Hoja1").Select Range("B1").Select Cells.Find(What:=buscardato, After:=ActiveCell, LookIn:=xlFormulas, LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext,...