prozac

Bueno pues si entiendo bien la pregunta el siguiente código hace lo que quieres: Private Sub TextBox1_KeyDown(ByVal cod As Msforms.ReturnInteger, ByVal shift As Integer) Dim maxi As Integer If Range("A1").Value = "" Then 'si la columna está vacia o...

Antes de contestar a tus preguntas y por claridad te aconsejo lo siguiente: a) Situar las cebeceras en la fila 4 dejando las tres primeras para los parámetros. En el ejemplo tengo lo siguiente: A4: Persona B4: Fecha Ingreso C4: Antigëdad D4: Horas...

Una forma sencilla puesto que si tienes una división vendrá de la división de dos números que están en dos celdas, sería: =IF(A1=0;"sin solución";"=A2/A1") Donde A1 está el divisor y en A2 el dividendo. La fórmula estaría en una tercera celda....

Veamos primero la rueda de bici. Sabemos que 360º=2Pi radianes y la circunferencia de la rueda es 2.PI.R. Por tanto. 8 = (2.PI.R) V + X donde v es el número entero de vueltas que da la rueda y X el resto que buscamos. Haciendo x=0 y R=0,35 vemos que...

Lo que tienes que hacer es resolver las ecuaciones de 2 grado. Es decir igualar el polinomio a 0 y resolver la ecuación. Como son de segundo grado te saldrán dos raíces. La factorización será del tipo (X-a) (X-b), donde a y b son las raíces. Para la...

No estoy seguro de entender bien, pero si lo que quieres no escribir la fórmula varias veces tendrías que separar las condiciones: A1 tienes el valor A2 tienes =SI(A1=80'81'82;"A";0) A3 tienes =SI(A2=90'91'92;"B";0) Si lo que quieres es tenerlo en...

Hace poco le indiqué a otra persona una URL donde viene explicada una macro para autocompletar a partir de una lista dada. Está aquí. vbaexpress.com/kb/getarticle.php?kb_id=244 En tu caso dado que quieres campos adicionales una vez la función...

Para evitar los mensajes de alerta puedes usar la siguiente instrucción anres de grabar (debería ser la primera en tu código). Application.DisplayAlerts = False

Aquí tienes el código que debes insertar en un módulo. Option Explicit Sub Auto_open() Call ListaCarpetas(Cells(1, 2).Value) 'ruta inicial End Sub Sub ListaCarpetas(ruta As String) 'Lista las carpetas a partir de la ruta origen en la columna A, desde...

Para reproducir tu ejemplo he hecho una hoja con los datos que indicas en las columnas A, B y C. En dicha hoja he insertado un botón y los tres combos. El código asociado es el siguiente. He utilizado una especie de truco de colores para que veas...