Adriel Ortiz Mangia

[Hola Prueba con esto =SI(A1>B1,"Pago Parcial",SI(A1=B1,"Pagado",SI(B1="","Por pagar"))) Sustituye los separadores (,) por el tuyo

[Hola Mi gran Maestro y Generoso Dante, me cuesta entender que hayas tomado esta decisión pero es algo que respeto mucho. Me queda decir Dante que estoy profundamente agradecido, porque gracias a tus aportaciones y otras personas que participan en...

[Hola Has clic derecho en la barra de estado y activa lo que necesitas

Pon la macro para actualizar

[Hola Prueba así, guardando la configuración de tu formulario a una celda. Por ejemplo para tu formulario los option if option1 = true then sheets("Hoja1").Range("A1") = "Bolivares" if option2 = true then sheets("Hoja1").Range("A1") = "Sol" . . . Y...

[Hola Te paso la macro Sub SEPARA_CADENA() ' 'VALORA LA RESPUESTA PARA FINALIZAR Set h1 = Sheets("Hoja1") Set h2 = Sheets("Hoja2") ' ini = 2 'fila inicio k = 1 h2.Cells.ClearContents For i = ini To h1.Range("AT" & Rows.Count).End(xlUp).Row If...

[Hola Te paso la macro Valora la respuesta con manito arriba para finalizar Sub copiar_datos() 'Por.Adriel ' Set h1 = Sheets("Hoja1") Set h2 = Sheets("Hoja2") ' h2.Cells.Clear k = 1 For i = 2 To h1.Range("A" & Rows.Count).End(xlUp).Row If h1.Cells(i,...

[Hola Te paso la macro Valora la respuesta para finalizar Sub copiahoja() 'Por.dam 'Act. Adriel Ortiz Set l1 = ThisWorkbook Set h1 = l1.Sheets("Hoja1") ' ruta = ThisWorkbook.Path & "\" ARCH = "NUEVA DATA" h1.Copy Application.DisplayAlerts = False...

Envíame tu archivo [email protected]

[Hola Te recomiendo que el color sea gris quede uniforme