Jump to content

tuve

Members
  • Posts

    933
  • Joined

  • Last visited

  • Days Won

    10

Everything posted by tuve

  1. Re: consulta Calendario Una solución (quizás haya un método más directo) con un botón en el formulario con la propiedad cancel = true. Fechas_io_ST_faeSS_2.zip
  2. Re: Mayor que menor que Aquí va el archivo con las soluciones que se han aportado. nomina._2.zip
  3. Re: Consulta #value! Hola julibaga, Intromisión ninguna, agradezco tu buena puntualización, a ver que comenta Fiskola. Un saludo,
  4. Re: Coordenadas Matriz No estoy muy seguro de que sea lo que buscas, espero tus comentarios. Libro1_2.zip
  5. Re: Consulta #value! Creo que el error se produce porque existen números con ".", por ejemplo, en la hoja Sheet1 celdas k3014, k3003, etc., excel interpreta estos números como texto, lo que genera un error al multiplicarlo por un número, en este caso 0 ó 1. Para solucionarlo, selecciona el rango K12:K3029 de la Sheet1, luego Inicio/Buscar y seleccionar/Reemplazar, Buscar: . Reemplazar con: , Y pulsas el botón reemplazar todos.
  6. Seleccionas las dos columnas, Datos/Ordenar, y en la nueva ventana seleccionas la columna por la que quieres ordenar y botón aceptar.
  7. Re: Textbox validacion y mensaje Con el controltiptext y el siguiente código debería ser suficiente: Private Sub TextBox1_Change() If Val(TextBox1.Value) > 100 Then MsgBox "No se puede superar el valor 100" End Sub[/CODE] Si no es lo que buscas sube un archivo con el ejemplo.
  8. Re: Modificar Formula EXTRAER Prueba esto:
  9. Quizás esto también podría servir: Sub EliminarFilasInferiores() Dim PrimeraFila As Long Dim UltimaFila As Long With ActiveSheet PrimeraFila = .Cells(1, "B").End(xlDown).Row + 1 UltimaFila = .Cells(Rows.Count, "B").End(xlUp).Row .Rows(PrimeraFila & ":" & UltimaFila).Delete Shift:=xlUp End With End Sub[/CODE] Saludos juancyuky, SEBASTIAN67
  10. Re: Modificar Formula EXTRAER Prueba así: Si no te funciona, indica el texto que tiene en la celda M4 y cómo quieres el resultado de la fórmula. Un saludo a Sebastian que se me ha adelantado, pero creo que vamos en la misma línea.
  11. Re: ¿ Error en Excel 2003 ? Fleming, hoy es 01/02/2011, o se me escapa algo?
  12. Re: Funcion BUSCARV La tabla TABLAOT, tiene 5 columnas, el campo Fecha de Actualizacion ha quedado fuera del rango. Vete a Formulas/Administrador de nombres/, selecciona TABLAOT y escribes: Después validas la introducción del nuevo rango.
  13. Re: Crear serie en excel Revisa el adjunto, debes arrastrar la fórmula hacia abajo. Serie_2.zip
  14. Re: Recuperar Código de Libro de Excel no Accesible ¿Has probado a abrir el archivo sin habilitar las macros?, no he tenido problemas abriéndolo de esta forma.
  15. Re: Tomar factor para una fórmula en función de lo seleccionado en un desplegable. Revisa el adjunto. CALCULO AZUCAR III_2.zip
  16. Re: Tomar factor para una fórmula en función de lo seleccionado en un desplegable. Sube el archivo con el resultado que quieres obtener en las celdas.
  17. Re: Cambiar rangos Quizás con indirecto, revisa el adjunto. CambiarRangos.zip
  18. Re: Tomar factor para una fórmula en función de lo seleccionado en un desplegable. Revisa el adjunto, He empleado la función: He cambiado los "." por "," por si quieres operar con los números, si no es el caso, puedes mantener los puntos. También he empleado un nombre para los rangos para clarificar la fórmula. CALCULOS AZUCAR_2.zip
  19. Re: Cambiar el contenido de una celda según su contenido Lo puedes hacer con macros: Private Sub Worksheet_Change(ByVal Target As Range) With Target If .Address = "$A$12" And .Value = "R1" Then .Value = Range("B12").Value End With End Sub[/CODE] (en el módulo de hoja) Aunque mi recomendación es que busques alternativas con fórmulas (utilizando otra celda "auxiliar" y la funsión SI), si comentas para que quieres este comportamiento quizás te podamos orientar.
  20. Re: formato hoja excel siempre MAYUSCULAS Una posible solución: Private Sub Worksheet_Change(ByVal Target As Range) Target.Value = VBA.UCase(Target.Value) End Sub[/CODE] Solo en la columna A: [CODE]Private Sub Worksheet_Change(ByVal Target As Range) 'Columna A If Target.Column = 1 Then Target.Value = VBA.UCase(Target.Value) End Sub[/CODE] En los dos casos tiene el inconveniente de no poder utilizar deshacer, si quieres utilizarlo (deshacer) tendrás que programarlo.
  21. Re: Problema formato excel. Posible archivo dañado Archivo/Abrir, se visualiza la ventana de abrir, seleccionas el archivo y en el ventana de abrir pulsas el triángulo del botón abrir, aparece un desplegable y seleccionas Abrir y reparar... qué tengas suerte!
  22. Re: SUMAPRODUCTO + una pequeña complicación Revisa el adjunto a ver si te sirve. P.D. se han adelantado y me falta añadir el rando de los importes sumap codigo fecha2.zip
  23. Otra posible solución, ojo en la fórmula de buscas debes añadir referencias absolutas al rango, sino al arrastrar se desplazará el rango de busqueda. Formato Txt a Excel_2.zip
  24. El problema lo tienes por la presencia de espacios en blanco en los datos numéricos, puedes eliminarlos con la función: Donde B3 está el número que contiene el espacio en blanco que genera el error.
  25. Re: dividir un numero en una poblacion x en partes iguales Ese comportamiento no hay forma de evitarlo, el caso que planteas 142,31/12 es un número periodico por tanto tendrá un número ilimitado de decimales, cuantos menos decimales cojas el error va a ser mayor.
×
×
  • Create New...

Important Information

Privacy Policy