Dante Amor

Si el libro está protegido, no es necesario mostrar la hoja para actualizar sus celdas. Tampoco es necesario desproteger el libro. Por ejemplo, abre un libro nuevo, crea una hoja nueva llamada "Hoja2", oculta la hoja, protege el libro. Corre la...

Ejecuta la siguiente macro Sub Macro3() ' ' Por.Dante Amor ' u = Range("A" & Rows.Count).End(xlUp).Row Range("D4:E" & u).FormulaR1C1 = "=IF(ISNUMBER(RC[-2]),IF((RC[-2])>R3C8,""PROXIMO A VENCER"", ""VENCIDO""),"""")" Range("F4:G" & u).FormulaR1C1 =...

La fórmula podría ser así: =(1+ ( ( (1- (2.99/15)^2)^2) / ( ( ( 2 * ((2.99/15)^2) ) * (1 - ( (2.99/15)^2)) ) + ( ((2.99/15)^2) * ( 1 - (-1*-10) )))) ) - (-10 / 0.44) Utilizando unas celdas para poner los valores de las variables, por ejemplo: La...

Envíame tu archivo y me explicas lo siguiente: En cuál hoja está la información que quieres imprimir En dónde pondrías los parámetros. Pon un ejemplo de parámetros En otra hoja, y dependiendo de los parámetros que pusiste, marca de amarillo lo que...

Explica a qué te refieres con ir a "otro userform", es decir, si en las variables de "Plan" y "Espcialidad" tienes 50 combinaciones posibles, ¿significa qué tienes 50 userforms? ¿Y en qué quieres que te ayude? En abrir otro form o en buscar los datos...

Puede ser así Después de esta línea: Range("D2").Select Pon lo siguiente: If Range("B2") = "" And Range("C2") = "" And Range("D2") = "" And _ Range("E2") = "" And Range("F2") = "" And Range("G2") = "" And _ Range("H2") = "" And Range("I2") = "" Then...

Revisa el siguiente enlace, ahí explico paso a paso para enviar un archivo Macro para enviar hoja excel por gmail . 'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias .

Pon la siguiente macro en los eventos de tu hoja Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'Por.Dante Amor If Not Intersect(Target, Range("D2:G10")) Is Nothing Then If Target.Count > 1 Then Exit Sub Target.Value = "x" End If End...

Te anexo una macro Pon tus 8500 filas en la "Hoja1", en esta hoja el barcode deberá estar en la columna A En la "Hoja2", en la columna A, pon los 1500 barcode Ejecuta la siguiente macro Sub Copiar_Barcode() 'Por.Dante Amor Application.ScreenUpdating...

Te faltó poner la hoja y una letra "d" en Enabled Sub Bloqueo2() If Hoja1.Range("G3").Value = TimeValue("00:00:00") Then Hoja1.OptionButton1.Enabled = False End If End Sub . 'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias . Avísame...