Luis Mondelo

Te mando la solución sigue mis instrucciones: Posiciónate en la primera celda de la columna B y ejecuta esta macro: Sub prueba() Do While ActiveCell.Value <> "" If ActiveCell.Value = "partida" Then posicion = ActiveCell.Address ActiveCell.Offset(0,...

Te mando la solución, sigue mis pasos: He copiado todos tus datos en la columna A desde A1 hacia abajo Después posiciónate en la primera celda, es decir, en la A1 y ejecuta esta macro: Sub transponer() fila = 1 primera = ActiveCell.Address Do While...

Por ejemplo si queremos evaluar la celda A1 pondremos esto: Sub prueba() If Application.WorksheetFunction.IsNumber(range("a1".value) Then ... ... Elseif Application. WorksheetFunction. Istext(range("a1". Value) Then ... ... End If End Sub Recuerda...

Prefiero que me mandes el archivo para verlo de cerca y me explicas en él lo que hay que hacer con un ejemplol [email protected]

Veamos un ejemplo: vamos a examinar los repetidos de la columna A. Ponte en la B1 y escribe esta fórmula: =CONTAR.SI($A$1:A1;A1) y después la copias hacia abajo Con esta fórmula te contará la veces que se ha repetido un valor en el transcurso de la...

Te mando mi solución. Ejecuta esta macro y todo listo: Primero se abrirá un browse para que elijas en qué carpeta están los txt Sub abrir_txt() On Error Resume Next milibro = ActiveWorkbook.Name Set navegador = CreateObject("shell.application")...

Te mando la solución. Ejecuta esta macro y todo listo: Sub lmd() 'macro creada por Luis Mondelo On Error Resume Next For Each hoja In ActiveWorkbook.Sheets hoja.Select Range("a1").Value = Range("a1").Value - ActiveSheet.Next.Range("a1").Value Next...

Esta es la solución: Nos posicionamos en la celda origen que en nuestro caso es la M5. Después ejecuta esta macro y todo listo: Sub saltar() ActiveCell.End(xlDown).Select End Sub Si lo quieres hacer con el teclado sin recurrir a una macro tienes que...

Si me mandas las dos tablas podré dejártelo configurado. [email protected]

Te mando la solución, sigue mis instrucciones: En la celda donde dice 1000 a 1100 tienes que poner un cero En la siguiente tienes que poner solo la cantidad 1101 En la siguiente 100 mas, es decir 1201... y asi hasta el final (todas las celdas solo...