calvuch

En E1 pones: =((D1/C1)-1) Dale formato porcentaje a 2 decimales y ya. Si es positivo te indica el incremento del precio antiguo respecto del nuevo, y si da negativo, pues la baja respecto del mismo Ahora si lo que deseas es mostrarlo en formato...

Así. Private Sub Command1_Click() Picture1.Picture = LoadPicture(Trim(Text1)) End Sub No olvides CERRAR la pregunta

Si bien excel cuenta con una opción para definir cuentas de usuario y permisos sobre las mismas. Si lo que te interesa es código, acá un ejemplo. Es diferetne al tuyo y te explico como funciona: En un modulo pones esto: Option Explicit Dim cadena As...

¿Tendrá alguna macro en el evento Workbook_BeforeClose?. Revisa en el editor de Vba (ALT+F11) Selecciona el objeto "ThisWorkbook" y revisa si tiene macros, si tienes alguna amcro en ese evento, pues elimínala

Considerando los datos que aporta En d2 pon esto: =indirecto("a" & coincidir(max($b$2:$b$4);$b$1:$b$4;0)) en E2 pon esto: =indirecto("a" & coincidir(max($c$2:$c$4);$c$1:$c$4;0)) Los datos de tus alumnos están desde A hasta C qeudando la fila 1 como...

Probé tu macro y no me arroja comillas, tu dices : alrededor de ciertos textos ¿Cuáles?

Los eventos change de la hoja no son sensibles al formato, pues un cambio de color por ejemplo no es considerado un cambio calculable. Lo mismo si desarrollamos una función personalizada que evalúe el contenido de la celda de columna a en función a...

Formularios con menu en Excel, pues no lo he realizado nunca, lo que hago es realizar las llamadas al form desde un botón o bien si lo deseas pon un control desplegable con la lista de nombres de tus formularios y haces la llamada desde un botón...

En la hoja 2 en donde deseas el resultado ( b12 de la hoja1) pones esto: =SI(Y(Hoja1!A1="Aprobado";Hoja1!A2="Aprobado";Hoja1!A3="Aprobado");+Hoja1!B12;"") Devolverá el valor de b12 hoja1 si y solo si a1 a2 y a3 de hoja 1 es igual ha Aprobado, ( la...

Prueba así: If TextBox1 = "" Then MsgBox "Ingrese un dato", vbInformation, "Celda Vacia": TextBox1.SetFocus If Not IsNumeric(TextBox1) Then Dim mensaje As String mensaje = MsgBox("Valor ingresado NO es Numerico" & Chr(13) & "Ingrese nuevamente!",...