Rudy Quispe

Rudy Quispe

Solo se que nada se.
 Perú @rudyquispetorres desde - visto
Preguntar

Preguntas

Pregunta en y en 2 temas más

Condicionante, bloqueo y eliminación de celdas

Quisiera que me apoyen en generar una macro para la condicionantes de SI/NO. Cuando la celda B2 es SI, se pueda registrar información en las celdas F4:F7 y H4:H7 pero que se bloquee la celda B4 y elimine información si se tiene. Y si la celda B2 es...
Pregunta en y en 2 temas más

Resaltar celda duplicados a mensaje de datos duplicados

Soy aficionado en la creación de macros, trato de identificar que cambios realiza cada proyecto y busco la forma de adaptar a mi trabajo diario. Tengo un macro que resalta cuando los datos son duplicados de una base de datos muy larga. Sub...
Pregunta en y en 2 temas más

Reducir formulación de macro, se ejecuta muy lento..

Para ejecutar la macro final depende de varias macros adicionales, la cual se demora en hacer el proceso, por lo cual pido su apoyo en poder disminuir todo el procesos, estas son las macros de acuerdo a cada procesos: MACRO FINAL: Sub...
Pregunta en y en 2 temas más

Adicional en sumatoria de macro referencia de formula

Tengo la siguiente macro: Sub DIAS_LABORADOS_JOR() Dim dia1 As String dia1 = Hoja3.Range("B" & Rows.Count).End(xlUp).Row For dia = 8 To dia1 If Hoja3.Range("BN" & dia).Value > "" Then Hoja3.Range("L" & dia).Value = 31 - Hoja3.Range("BN" & dia).Value...
Pregunta en y en 3 temas más

Ejecutar datos repetidos mediante mensaje o alerta

Tengo la siguiente macro que cada vez que ingreso un dígito y se repite lo sombrea, quisiera en vez de sombrearse hay forma que me de una Alerta o mensaje que ya existe el dato registrado, a la vez me puedan ayudar en reducir la ejecución de las...
Pregunta en y en 3 temas más

Código para evitar ingresar datos repetidos desde modulo

Como hago para cargar ese macro Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Target.Column = 1 Then dato = Target.Value contarsi = Application.WorksheetFunction.CountIf(Columns(1), dato) If contarsi > 1 Then MsgBox "el...